Question

Запросить с клавиатуры 2 числа и вывести на экран. Является ли их сумма кратной 5
паскаль

Answer 1

var a, b: integer;
begin
readln(a, b);
writeln('Первое число = ', a);
writeln('Второе число = ', b);
if (a + b) mod 5 = 0 then
  writeln('Сумма двух чисел кратна пяти.')
else
  writeln('Сумма двух чисел не кратна пяти.');
end.