Написать программу (паскаль) которая проверяет делится ли на три целое
число введённое с клавиатуры.
Введите целое число и нажмите enter 451
Число 451 нацело не делится

Предыдущий
вопрос Следующий
вопрос

program DivideByThree;

var
num: integer;

begin
writeln('Введите целое число и нажмите enter');
readln(num);

if num mod 3 = 0 then
writeln('Число ', num, ' делится нацело на 3')
else
writeln('Число ', num, ' нацело не делится на 3');
end.

// Введите целое число и нажмите enter
// 451
// Число 451 нацело не делится