program4.txt

来自「编译原理课程设计大作业PL0文法简易编译器」· 文本 代码 · 共 16 行

var i,j:integer;
begin
    for i:=1 to 9 do
    begin
      for j:=1 to 9 do
      begin
        write(j);
write(i);
write(i*j);

      end;
      writeln;
    end;
    readln;
end.