Предмет: Информатика, автор: fatima1361

Найдите разность максимального и минимального из четырёх чисел.

Ответы

Автор ответа: PrOgMeR
1
begin 
var a:=ReadArrReal('Введите 4 числа:',4); 
Writeln('Разность наибольшего и наименьшего: ',a.Max-a.Min)
end.
Похожие вопросы
Предмет: Алгебра, автор: fffffggttt