Как вывести результат двумерного массива на экран в виде таблицы - Pascal

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

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

как вывести результат двумерного массива на экрант в виде таблицы

Решение задачи: «Как вывести результат двумерного массива на экран в виде таблицы»

textual
Листинг программы
program lab5;
const n=10;
var i, j:integer;
max, min, z,y:real;
        a:array [1..n, 1..n] of real;
        x: array [1..n] of real;
  begin
 writeln ('ïåðâГ*Гї Г·Г*Г±ГІГј');
   for j:=1 to n do
   for i:=1 to n do
   a[j,i]:=ln(j+1)/(ln(i+1)+ln(j+1));
   for j:=1 to n do
   begin
     for i:=1 to n do
     write(a[j,i]:10:2);
     writeln;
   end;
 end.

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

Этот код написан на языке Pascal и выполняет следующие действия:

  1. Объявляет переменные: n, i, j, max, min, z, y, a и x. Переменная n инициализируется значением 10. Переменные i и j инициализируются значением 1. Переменные max и min инициализируются значением 0. Переменные z и y инициализируются значением 0. Переменная a инициализируется значением 0. Переменная x инициализируется значением 0.
  2. Выводит на экран строку ïåðâГ*Гї Г·Г*Г±ГІГј.
  3. Запускает цикл for для перебора значений j от 1 до n. Внутри цикла запускается еще один цикл for для перебора значений i от 1 до n.
  4. Внутри внутреннего цикла вычисляет значение a[j,i] как натуральный логарифм суммы j+1, i+1 и j+1, и сохраняет его в переменной a[j,i].
  5. Выводит на экран значения a[j,i] для всех значений j и i с помощью функции write. Для каждого значения a[j,i] выводится 10 пробелов и 2 знака после запятой. После вывода значения a[j,i] для i выводится символ новой строки writeln.
  6. По завершении внутреннего цикла выводит значение a[j,i] для i равное n+1.
  7. По завершении внешнего цикла выводит значение a[j,i] для j равное n.
  8. Завершает программу.

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

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