In bảng nhân từ 2 đến 9 ra màn hình, bố trí bốn bảng đầu ở nửa trên và bốn bảng sau ở nửa dưới. Nêu ý tưởng làm bài và viết chương trình ngôn ngữ lập trình pascal.
1 câu trả lời
Ý tưởng: Dùng Gotoxy đi đến nơi cần xuẩ rồi xuất.
uses crt;
var i,j:longint;
begin
clrscr;
for i:=1 to 5 do
begin
gotoxy(i*7,1);
for j:=1 to 10 do
begin
gotoxy(i*10,j);
writeln(i,'*',j,'=',i*j);
end;
end;
for i:=6 to 9 do
begin
gotoxy((i-5)*7,11);
for j:=1 to 10 do
begin
gotoxy((i-5)*10,j+11);
writeln(i,'*',j,'=',i*j);
end;
end;
readln
end.