program Project1;{$APPTYPE CONSOLE}usesSysUtils;varx,y,z:integer;begin{ TODO -oUser -cConsole Main : Insert code here }try
for x := 1 to 9 do
begin
for y := 1 to x do //与for y:=1 to x-1 do的区别
begin
z:=x*y;
write(x,'×',y,'＝',z,' ');//输出x*y=z的形式
end;
writeln(#13);
end;
re...
|
