• Предмет: Информатика
  • Автор: Манюнчик19
  • Вопрос задан 10 лет назад

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

Ответы

Ответ дал: emblerik
0

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

 

var

  n : integer;

begin

  read (n);

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

end.

Похожие вопросы