Степень двумерного массива - PascalABC.NET

Узнай цену своей работы

Формулировка задачи:

Задача состоит в том чтобы при вводе первой строки,2 строка квадрат первой,3 строка в третей степени первой строки и т.д. Вот что смог написать,дальше не знаю, подскажите как сделать.

Решение задачи: «Степень двумерного массива»

textual
Листинг программы
program qq;
var
  a: array[1..5, 1..5] of integer;
  n, m, i, j: integer;
 
begin
  write(' Введите кол-во строк ');
  readln(n);
  write( ' Введите кол-во столбцов ');
  readln(m);
  for i := 1 to n do
    for j := 1 to m do
    begin
      if i = 1 then
      begin
        write('a[', i, ',', j, ']=');
        readln(a[i, j]);
      end
      else a[i, j] := a[i-1, j] * a[1, j]
    end;
    
  for i := 1 to n do
  begin
    for j := 1 to n do
      write(a[i, j]:6);
    writeln;
  end;
end.

Объяснение кода листинга программы

В этом коде создается двумерный массив размером 5x5, а также четыре переменные: n, m, i, j (циклы for в этом языке не поддерживаются, поэтому используются переменные-счетчики).

  1. Ввод количества строк и столбцов массива с помощью функций write и readln.
  2. Два вложенных цикла for для заполнения массива a. В первой итерации внешнего цикла, если i=1, то выводится приглашение для ввода значения элемента a[1,j], иначе значение элемента a[i,j] присваивается произведению a[1,j] и a[i-1,j].
  3. Два вложенных цикла for для вывода значений массива a на экран.
  4. Вывод значений массива a с помощью функции write.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

15   голосов , оценка 3.733 из 5
Похожие ответы