пользователь вводит два числа если большее кратно меньшему то ...
пользователь вводит два числа если большее кратно меньшему то найдите их сумму в противном случае найдите их частное
Есть ответ
17.12.2022
366
Ответ
var
a, b:integer;
begin
write('a = '); readln(a);
write('b = '); readln(b);
if a < b then
begin
a := a + b;
b := a - b;
a := a - b;
end;
if a mod b = 0 then
writeln('a + b = ', a + b)
else
writeln('a / b = ', a / b);
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022