Составьте программу,определяющую,является ли данное число кратным 4
Составьте программу,определяющую,является ли данное число кратным 4
Гость
Ответ(ы) на вопрос:
Гостьprogram main;
var a: integer;
begin
readln(a);
If a mod 4 = 0 then
write ('число кратно четырем')
else
write ('число не кратно четырем');
readln;
end.
Не нашли ответ?
Похожие вопросы