Составить программу,определяющую результат гадания - вопрос №506928 от F1er 16.09.2020 13:31

Question

Информатика: Составить программу,определяющую результат гадания на ромашке любит -не любит ,взяв за исходное данное количество лепестков n.

F1er · Answer

Если четное, то не любит :(, если нечетное - то любит :).

var

n : integer;

begin

read (n);

if n mod 2 = 0 then writeln (':(') else writeln (':)');

end.

Составить программу,определяющую результат гадания на ромашке "любит -не любит",взяв за исходное данное количество лепестков n.