Используя признаки делимости, написать программу в паскале, которая проверяет, делится ли натуральное число k на 4 (две последние цифры нули или образуют число, делящееся на 4).
More Questions From This User See All
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Внимание! Если программа не работает, обновите версию!
begin
var k:=ReadInteger('n=');
var a:=k mod 10; // поледняя цифра
var b:=(k mod 100) div 10; // предпоследняя цифра
if (a=0) and (b=0) or ((10*b+a) mod 4=0) then Writeln('Делится на 4')
else Writeln('Не делится на 4')
end.
Пример
n= 567264
Делится на 4