multiblying table i canot do?

[ahmedsamir]

i can not do a multiblying table by pascal in this form
1 2 3 4 5 6 7 8 9 10 11 12
1 1 2 3 4 5 6 7 8 9 ...........
2 2 4 6............................
3 ..............................
4 ...................
5 .
6 .
7 .
8 .
9 .
10 .
11 .
12 .

i can not do this i tyed to do but i can not do it at this form
i did two counters loop and multeblying them each other but there are not wat i want

i will be so happy 2 help me
thank u

[Real-tiner]

It would help if you could spel.

[Jackrabbit]

Not exactly the formatting you wanted but should get you started...

program mtable;

{$APPTYPE CONSOLE}

uses
  SysUtils;

var
   I : Integer;
   J : Integer;
begin
   for I := 1 to 12 do
   begin
      for J := 1 to 12 do
      begin
         write( IntToStr( J * I ) + chr( 9 ) );
      end;
      writeln;
   end;
end.