Алгоритм через паскаль Найти максимальное и минимальное значения из трех различных вещественных чисел.
Алгоритм через паскаль
Найти максимальное и минимальное значения из трех различных вещественных чисел.
Гость
Ответ(ы) на вопрос:
Гостьvar i,x,y,max,min:real;
begin
readln(i,x,y);
if i>x then max:=i else max:=x;
if maxy then min:=y;
writeln('max=',max,'; min=',min);
end.
Не нашли ответ?
Похожие вопросы