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

Question

Терос

23 апреля, 22:44

+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.