Заполнить одномерный массив размерности N случайными - вопрос №13554045 от Никита20071910 01.11.2020 08:12

Question

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

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