Вывод данных в виде таблицы - Turbo Pascal (29585)

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

можно ли сделать одну целую таблицу,чтоб она выводила все i и соответствующие ей y y:=\sum_{i=1}^{n=10} e^i

Решение задачи: «Вывод данных в виде таблицы»

Листинг программы

var i:byte;
begin
writeln('----------------');
writeln('|  i |    y    |');
writeln('----------------');
for i:=1 to 10 do
writeln('|',i:3,' |',exp(i):9:2,'|');
writeln('----------------');
end.

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

Объявляется переменная i типа byte.
Выводится строка ----------------, разделяющая заголовки столбцов таблицы.
Выводится строка | i | y |, разделяющая заголовки и данные таблицы.
Запускается цикл for, который будет выполняться от 1 до 10.
Внутри цикла выводится значение переменной i (в виде числа) и значение функции exp(i), которая вычисляет экспоненту от i (в виде числа с плавающей точкой).
Выводится строка |, обозначающая начало нового столбца.
Выводится значение переменной i (в виде числа) и значение функции exp(i).
Выводится строка |, обозначающая конец предыдущего столбца и начало следующего.
Цикл продолжается до тех пор, пока не будут выведены все значения.
Выводится строка ----------------, завершающая вывод таблицы.