Предмет: Информатика, автор: Манюнчик19

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

Ответы

Автор ответа: emblerik
0

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

 

var

  n : integer;

begin

  read (n);

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

end.

Интересные вопросы
Предмет: Литература, автор: Вероника99