Дан массив, заданный датчиком случайных чисел в интервале [-60;140]. Определить, минимальный и максимальный элемент массива.
Дан массив, заданный датчиком случайных чисел в интервале [-60;140]. Определить, минимальный и максимальный элемент массива.
Гость
Ответ(ы) на вопрос:
Гостьvar arr: array[1..100] of integer; min,max:integer;
begin
for var i:=1 to 100 do arr[i]:=random(-60,140);
min:=arr[1];
max:=arr[1];
for var i:=2 to 100 do begin
if arr[i]max then max:=arr[i];
end;
writeln(arr);
writeln('Максимальный элемент: ', max, ', Минимальный элемент: ',min);
end.
Не нашли ответ?
Похожие вопросы