Исходник программы для вывода таблицы умножения

Исходник программы для вывода таблицы умножения

Исходник программы, которая выводит всем известную таблицу умножения или таблицу Пифагора. Осуществляется это благодаря двум циклам с параметром - 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
Дата: 2012-04-07 21:11:47   Просмотров: 5982

Теги: Паскаль Pascal FOR исходник циклы