Нужно составить программу (Pascal) определяющую является ли число А кратным числу В.
Нужно составить программу (Pascal) определяющую является ли число А кратным числу В.
Ответ(ы) на вопрос:
var a,b: integer;
begin
readln(a);
readln(b);
if (a mod b)=0 then
writeln('Число кратно')
else writeln('Число не кратно');
end.
Не нашли ответ?
Похожие вопросы