Algorítmo nayy

program li;
var num: integer;

begin

read (num);
if (num > (num mod 5))then;
write (maior)
else
(num <>
write menor);
end.
if
(num mod 2=o) then;
write ("par");
else
write ("impar");
end;
end.