Дано 2 числа. проверь если большее число делится на меньшее точно. пример: входные данные: 10 250; выходные данные: 250 делится точно на 10 на паскаль нужно решение, пож.

166

500

Посмотреть ответы 2

Ответы на вопрос:

Марина2808

Информатика

4,8(87 оценок)

Program aaa; var a,b: integer; begin writeln('введите два числа: '); readln(a,b); if a> b then begin if (a mod b) = 0 then writeln('число ',a,' точно делится на число ',b) else writeln('число ',a,' не делится на число ',b,' без остатка'); end; if b> a then begin if (b mod a) = 0 then writeln('число ',b,' точно делится на число ',a) else writeln('число ',b,' не делится на число ',a,' без остатка '); end; end.