Задача по программе Паскаль.
Ввести число с клавиатуры,если это число кратно 8 и кратно 10,то вывести в ответ Yes, иначе No

Zemoten Zemoten    3   13.05.2020 18:26    2

Ответы
lemyana2017 lemyana2017  14.10.2020 17:23

var a: integer;

begin

 readln(a);

 if (a mod 8=0) and (a mod 10=0) then writeln('Yes') else writeln  ('no')

 end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика