Заполнить одномерный массив размерности N случайными - вопрос №13554045 от FannyPanda 02.01.2022 01:03

Question

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

FannyPanda · 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.Пример работы:...