Заполнить одномерный массив размерности N случайными - вопрос №13554270 от Анастасия2787 27.07.2022 20:17

Question

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

Анастасия2787 · 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.Пример работы:...