составить программу которая печатает таблицу умножения. ПАСКАЛЬ!

я так делал на яве от нехрен делатьпаскальvar i,n,j:integer;beginfor i:=1 to 10 dobeginfor j:=1 to 10 dobeginn:=j*i;write('   ', n)end;writeln();end;end.