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

Question

Нурсултан

6 июня, 21:05

+3

Ответы (1)

Знаешь ответ?

Потит · Answer 1

Program qwerty;

var k, a:integer;

begin

readln (k);

a:=k mod 100;

if (a=0) or (a mod 4=0) then write ('Да')

else write ('Нет')

end.