Составить программу на языке Паскаль:
С клавиатуры вводится любое целое число (тип integer). Определить (вывести на экран сообщение), является ли это число кратным 3.
Пожалуйста быстрее!!!
С клавиатуры вводится любое целое число (тип integer). Определить (вывести на экран сообщение), является ли это число кратным 3.
Пожалуйста быстрее!!!
More Questions From This User See All
Answers & Comments
begin
write (‘ Введи число a’);
readln (a);
If a mod 3= 0 then
write (‘ число кратно трём ‘)
else
write (‘число не кратно трём ‘);
end.