составьте программу, определяющую, является ли данное число кратным 4

Question

Информатика

Никеша

5 января, 01:37

составьте программу, определяющую, является ли данное число кратным 4

+2

Ответы (1)

Знаете ответ на вопрос?

Артемчик · Answer 1

Program main;

var a: integer;

begin

readln (a) ;

If a mod 4 = 0 then

write ('число кратно четырем')

else

write ('число не кратно четырем') ;

readln;

end.