Const n = 5;{ это позволяет в одном месте изменить количество чисел }
type numeric = real;{ это позволяет в одном месте изменить тип чисел }
var max, min: numeric; i: integer; a: array[1..n] of numeric;
begin Writeln('Введите ', n, ' произвольных чисел через пробел'); Read(a[1]); min := a[1]; max := min; for i := 2 to n do begin Read(a[i]); if max < a[i] then max := a[i] else if min > a[i] then min := a[i] end; Writeln('Минимальное введенное: ', min, ', максимальное: ', max) end.
Тестовое решение: Введите 5 произвольных чисел через пробел 34 157 -84.54 14.843 -13.64 Минимальное введенное: -84.54, максимальное: 157
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Задание 1 Вычислите значения выражений на языке Python:31) а b – 6, 4 (b+8) + = Ь42) d=a*b — 2abi (a + b)3а - 2ab+b?2a(3а - b)4) tx - 4xy(x+y?)5) h=ju + 1, 7* (2 + 3)3) 4 =ретения
n = 5;{ это позволяет в одном месте изменить количество чисел }
type
numeric = real;{ это позволяет в одном месте изменить тип чисел }
var
max, min: numeric;
i: integer;
a: array[1..n] of numeric;
begin
Writeln('Введите ', n, ' произвольных чисел через пробел');
Read(a[1]);
min := a[1]; max := min;
for i := 2 to n do
begin
Read(a[i]);
if max < a[i] then max := a[i]
else
if min > a[i] then min := a[i]
end;
Writeln('Минимальное введенное: ', min, ', максимальное: ', max)
end.
Тестовое решение:
Введите 5 произвольных чисел через пробел
34 157 -84.54 14.843 -13.64
Минимальное введенное: -84.54, максимальное: 157