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