Program Emerson;
Var Num:Integer;
Begin
Read (Num);
If (Num > Num MOD 5) Then
Write (''É maior");
Else
If (Num <>
Write ("É menor");
End
If (Num MOD 2=o)Then
Write ("Par");
Else
Write("Impar");
End
End.