Используя признаки делимости, написать программу в паскале, которая проверяет, делится ли натуральное число k на 4 (две последние цифры нули или образуют число, делящееся на 4).

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

program DivisibleBy4;

var
k: integer;

begin
writeln('Enter a natural number: ');
readln(k);

if (k mod 100 = 0) or (k mod 4 = 0) then
writeln(k, ' is divisible by 4')
else
writeln(k, ' is not divisible by 4');
end.