delphi命令行窗口实现9*9乘法表

进入delphi开发环境，选择file---new---other---consol application

输入以下代码：

var i,j :Integer ;
begin
      for i :=1 to 9 do
      begin
        for j := 1 to i do
          write(i*j : 3);
          writeln;
      end ;
         readln;
end.
 

代码含义：

var i,j :Integer ; 定义两个变量i,j为integer类型

begin  end表示程序开始结束代码块。

双重循环第一层表示输出行，从1行到9行分别输出1到9

第二行是输出列