решить задачи, язык: Pascal - вопрос №13570139 от Shaha2000 20.06.2021 19:54

Question

Информатика: решить задачи, язык: Pascal

Shaha2000 · Answer

PascalABC.NETЗадание 1:begin var n := ReadInteger( n: ); var a := MatrRandom(n, n, -27, 28); a.Println; a.ElementsByRow.Product(x - x 0 ? BigInteger(x) : 1).Print end.Задание 2:begin var n := ReadInteger( n: ); var a := ArrRandom(n, -18, 24); a.Println; a.Where(x - x 0).ElementAt(2).Print end.Примеры работ:...