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

Ответы (1)

Раяд 10.01.2025 5

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.

Знаете правильный ответ?

Думаешь ответы не верны?

Найди верный ответ на вопрос по предмету Информатика, если вы не получили ответа или никто не дал верного ответа, то рекомендуется воспользоваться поиском и попытаться найти ответ на свой вопрос среди похожих запросов.

Воспользуйтесь поиском

Новые вопросы по предмету Информатика:

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

Думаешь ответы не верны?

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