Дан первый элемент массива С, вычисленный случайным образом. Сформировать массив С(N) в...

+942 голосов
6.7m просмотров

Дан первый элемент массива С, вычисленный случайным образом. Сформировать массив С(N) в котором каждый последующий элемент массива меньше предыдущего на удвоенную размерность массива. Вывод ответа осуществить в столбец. 2) Дана таблица М(7,7). Заполнить её случайными числами. Найти общее произведение элементов стоящих в строках под четными номерами в таблице М. Вывести на экран исходную таблицу М.


Информатика | 6.7m просмотров
Дан 1 ответ
+115 голосов

PascalABC.NET

Задание 1:

  • begin
  • var N := ReadInteger('N:');
  • var C := ArrGen(n,Random(100),x->x-2*n);
  • C.PrintLines
  • end.

Задание 2:

  • begin
  • var M := MatrRandom(7,7,1,9);
  • M.Rows[1::2].Product(x->x.Product).Println;
  • M.Print
  • end.

Пример работы:

(3.7k баллов)