Сформировать массив из 10 элементов случайным образом взятых из множества {-2, 0, 2, 4, 6}. Найти максимальный и минимальный элементы массива, вывести элементы и их порядковые номера на экран Напишите как записать плиииз
Сформировать массив из 10 элементов случайным образом взятых из множества {-2, 0, 2, 4, 6}. Найти максимальный и минимальный элементы массива, вывести элементы и их порядковые номера на экран
Напишите как записать плиииз
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
// Внимание! Если программа не работает, обновите её версию!
begin
var cs:=Arr(-2,0,2,4,6);
var a:=new integer[10];
Randomize;
for var i:=0 to 9 do a[i]:=cs[Random(0,4)];
a.Println;
Writeln('a[',a.IndexMin+1,']min=',a.Min);
Writeln('a[',a.IndexMax+1,']max=',a.Max);
end.
Пример
0 0 -2 -2 -2 2 -2 6 2 4
a[3]min=-2
a[8]max=6
Не нашли ответ?
Похожие вопросы