с клавиатуры вводится два числа требуется найти модуль минимального значения
var
a, b : real;
begin
read (a, b);
if a > b then write (abs (b)) else write (abs (a));
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
