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

1

Ответы и объяснения

  • Listr
  • середнячок
2013-05-17T22:10:41+04:00
Program main;
var a: integer;
begin
readln(a);
If a mod 4 = 0 then
write ('число кратно четырем')
else
write ('число не кратно четырем');
readln;
end.