Предмет: Информатика
Автор: ArtemR40
Вопрос задан 2 года назад

Pascal
Найти максимальный и минимальный элементы одномерного массива из N вещественных чисел (< 50), сформированного случайным образом. Вывести на экран массив, сами элементы и их сумму в формате с фиксированной точкой.

LRSM: Найти ... элементы массива из N вещественных чисел (< 50).
К чему относится (<50)?
К N, к элементам, к массиву, к чему?

ArtemR40: К массиву

LRSM: То есть N<50?

LRSM: Или рэндомные элементы < 50?

LRSM: Или нужно найти макс. и мин. из элементов массива, которые <50?

ArtemR40: Рандомные элементы, из них найти максимальный и минимальный

Ответы

Ответ дал: LRSM

PascalABC.NET

Ответ:

begin
var a:= ArrRandomReal(ReadInteger('N='),0,50);
Println(a);
a.Println;
Println('Сумма:',a.Sum);
Println('Макс:',a.Max);
Println('Мин:',a.Min);
end.

Пояснение:

Если нужно найти не значение максимального элемента массива, а его номер (индекс), то можно заменить Max на IndexMax и соответственно Min на IndexMin.

Пример работы:

Приложения: