Помогите решить задачи, язык: Pascal
Приложения:

BobbyFresnel:
В первой или переходить на real, или делать с BigInteger. А так - пустяковые задачи.
Ответы
Ответ дал:
0
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.
Примеры работ:
Приложения:


Вас заинтересует
2 года назад
2 года назад
2 года назад
7 лет назад
7 лет назад