好水，不想做！自己做吧！

我会，先给分

你好狡猾！ 嘿嘿！

嘿嘿，你说‘有好答案追加全部家当’，你有啥家当啊！把自己卖了吗？

2.
var n,i,j:longint;
begin
     readln(n);
     for i:=1 to n do
     begin
           for j:=1 to i do
           write(j:3);
           if j=i then writeln;
end;
end.
3.var n,i,j:longint;
begin
     readln(n);
     for i:=1 to n do
     begin
           for j:=1 to i do
           write(j,'*',i,'=',j*i:3);
           if j=i then writeln;
end;
end.