Cho số nguyên dương N, hãy viết thuật toán và chương trình để tạo lập bảng N*N phần tử nguyên dương theo quy luật được cho trong ví dụ sau:
N=6:
1 2 3 4 5 6
2 4 6 8 10 12
3 6 9 12 2 4
4 8 12 2 4 6
5 10 2 4 6 8
6 12 2 4 6 8
Uses crt;
Trả lờiXóaVar n,gh,i,j:longint;
f:array[1..100,1..100] of longint;
Begin
readln(n);
gh:=n*2;
For i:=1 to n do
For j:=1 to n do
If i*j<gh then f[i,j]:=i*j;
For i:=1 to n do
For j:=1 to n do
If f[i,j]=0 then Begin f[i,j]:=2; break; end;
For i:=1 to n do
For j:=1 to n do
If f[i,j]=0 then f[i,j]:=f[i,j-1]+2;
For i:=1 to n do
Begin
For j:=1 to n do
Write(f[i,j]:4);
Writeln;
end;
readln;
end.