杭州交通信息网西安人行家属院二手房:pascal题目!!
来源：百度文库 编辑：杭州交通信息网 时间：2024/05/13 14:11:54
打印99乘法表.谢谢
var i,j,k,l:integer;
s:string;
begin
for i:=1 to 9 do begin
for j:=i to 9 do begin
k:=i*j;
str(k,s);
l:=length(s);
if l=1 then writeln(i,'*',j,'=',k,' ')
else writeln(i,'*',j,'=',k,' ');
end;
writeln;
end;
end.