Algoritmo

Programji;
Var Num: Interger;
Begin
___Read (Num);
_____If
______(Num>(NumMod5))Then;
______Write (Maior);
____Else
______(Num<(NumMod5))Then;
______Write (Menor);
____End;
____If
______(NumMod2=0)Then;
______Write(Par);
____Else
______Write(Impar);
____End;
End.