Исходник программы, которая выводит всем известную таблицу умножения или таблицу Пифагора. Осуществляется это благодаря двум циклам с параметром - FOR. Есть пояснительные комментарии к некоторым строкам. Скачать исходник или посмотреть исходный код можно ниже.
Исходный код программы:
const n = 9; //Максимальное значение в таблице
begin
for var i:=1 to n do //Задание i
begin
for var j:=1 to n do
write(i*j:4); //Вывод таблицы
writeln; //Перенос строки
end;
end.//Конец программыМожно обратить внимание, что в этой программе дан наглядный пример описания переменной в самом цикле (for var j:=1 to n do).
Скачать исходник: tablu.pas