Заполнить одномерный массив размерности N случайными - вопрос №13554947 от artur19912000 11.11.2021 19:56

Question

Информатика: Заполнить одномерный массив размерности N случайными числами. Заменить все элементы массива стоящие до максимального элемента нулями. Вывести на экран исходный и полученный массивы. Код нужен в Pascal

artur19912000 · Answer

PascalABC.NETbegin var a := ArrRandom(ReadInteger( N: ),-99,99); a.Println; for var i := 0 to a.IndexMax-1 do a[i] := 0; a.Print end.Пример работы:...