Если четное, то не любит :(, если нечетное - то любит :).
var
n : integer;
begin
read (n);
if n mod 2 = 0 then writeln (':(') else writeln (':)');
end.
Если четное, то не любит :(, если нечетное - то любит :).
var
n : integer;
begin
read (n);
if n mod 2 = 0 then writeln (':(') else writeln (':)');
end.