Pascal Найти максимальный и минимальный элементы одномерного массива из N вещественных...

Question

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

Comments

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

---

К массиву

---

То есть N<50?

---

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

---

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

---

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

Answer 1

                                     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.

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

---