programe99;var j,i:integer;beginfor i:=1 to 9 do begin for j:=1 to i do
begin
write(i,'*',j,'=',j*i:2,' ');
end; writeln; end;end.两层for do 欠套。注意j*i的场宽和外层for do的换行语句。这样可以让格式整齐。1*1= 12*1= 2 2*2= 43*1= 3 3*2= 6 3*3= 94*1= 4 4*2= 8 4*3=12 4*4=165*1= 5 5*2=10 5*3=15 5*4=20 5*5...