tabliczka mnozenia pascal

[magdalen_e]

Witam,
otóż napisałam program obliczający tabliczke mnożenia.i teraz na podstawie wykorzystanej tam petli mam napisac program
program wypełniający przy uzyciu pętli zadeklarowaną tablicę
dwuwymiarową zawierającą tabliczkę mnozenia. Program powinien w
wyniku podać wartość wybranego pola tablicy.Czy ktoś w wolnej chwili mógłby coś doradzić lub pomóc? bo nie jestem jeszcze biegła w Pascalu.Pod spodem wklejam kod do tej mojej tabliczki mnożenia, zeby ktos nie powiedział , ze sama nic nie potrafię napisać

Program tabliczka;
uses CRT;
var
i,j:byte;
BEGIN
clrscr;
FOR i:=1 TO 9 DO
BEGIN
TextColor(black);
TextBackGround(lightgray);

FOR j:=1 TO 9 DO
BEGIN
TextColor(yellow);
TextBackGround(red);
write(' (',i*j,') ');
END;
writeln;
END;
readln;
END.



Z góry dziekuje za opdpowiedz.
Pozdrawiam

[wawek91]

Kod: Zaznacz cały

program tabliczka;

uses crt;

var
tab : array[1..10,1..10] of byte;
i,j:byte;

begin
     for i:=1 to 10 do
         for j:= 1 to 10 do
             tab[i,j] := i*j;

     for i:=1 to 10 do
         for j:=1 to 10 do
         begin
              write(tab[i,j]:4);
              if j=10 then writeln;
         end;

     readln
end.

Czy o to chodziło?

PS: Mam nadzieję, że piszesz w Pascal'u bo wam każą na uczelni, a nie sama z siebie