Question

zadanko w pascalu

proszę Wyświetlić tabliczkę mnożenia dla liczby 6 (czyli mnożenie przez 6 od 1 do 10)

Do tego nalezy uzyc petli for.

Prosze z góry dzięki;**

daje naaj;d

Answer 1

program zad;
uses crt;
var
tab1:array[1..10, 1..6] of integer;

x,y:integer;


begin
clrscr;

for x:=1 to 10 do
begin
for y:=1 to 6 do
begin

tab1[x][y]:=x*y;
write(tab1[x][y]:4);
end;
 writeln;
end;




readln;
end.