Вопрос, который вызвал трудности
Написать программу: Дан массив А(30), заполненный датчиком случайных чисел. Найдите экстремум.
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «ЕГЭ (школьный)». Ваш вопрос звучал так: Написать программу: Дан массив А(30), заполненный датчиком случайных чисел. Найдите экстремум.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
Program zadaha2 (input. output); {нахождение наибольшего и наименьшего}
var
a: array[1..30] of integer;
i, min,max: integer;
begin
randomize;
for i:=1 to 30 do begin
a[i]:=random (50);
writeln(‘значение’, I,’ элементы массива =’, a[i]);
end;
min:=a[1];
max:=a[1];
for i:=1 to 30 begin
if a[i]<min then min:=a[i];
if a[i]>max then max:=a[i];
end;
writeln (‘max=’, max, ‘min=’, min);
readln;
end.
var
a: array[1..30] of integer;
i, min,max: integer;
begin
randomize;
for i:=1 to 30 do begin
a[i]:=random (50);
writeln(‘значение’, I,’ элементы массива =’, a[i]);
end;
min:=a[1];
max:=a[1];
for i:=1 to 30 begin
if a[i]<min then min:=a[i];
if a[i]>max then max:=a[i];
end;
writeln (‘max=’, max, ‘min=’, min);
readln;
end.