Составить программу,определяющую результат гадания - вопрос №506426 от t4dhjnd1u24ytgh 14.08.2021 06:37

Question

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

t4dhjnd1u24ytgh · Answer

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

var

n : integer;

begin

read (n);

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

end.

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