Определить кратно ли заданное число 3 если нет вывести остаток
Определить кратно ли заданное число 3 если нет вывести остаток
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
var a: integer;
begin
readln(a);
if a mod 3=0 then writeln('Кратно 3')
else writeln(a mod 3);
end.