Hogy lehet megszerkezteni free pascal-ba a szorzótáblát mondjuk csak 3-ig? (FOR ciklusváltozó: = kezdőérték TO végérték DO utasítással)

Évek óta nem paszkáloztam, így a szintaktika biztos hogy hibás lesz, de te majd kijavítod, a lényeg látható így is.

for i:=1 to 3 do

begin

for j:=1 to 3 do

begin

write(i + '*' + j + '=' + i*j + " "); //Gőzöm nincs mi a jele a sztringek összefűzésének, a + jelet cseréld ki a helyes jelre

end;

writeln();

end;

program tes;

uses crt;

var i,j,o:integer;

begin

clrscr;

for i:=1 to 10 do

for j:=1 to 3 do

begin

o:=i*j

writeln(i,'*',j,'=',o);

end;

readln;

end.