Bài tập 2: Viết chương trình hiển thị ra màn hình AAAAAA AAAAAA AAAAAA AAAAAA
2 câu trả lời
program baitap;
uses crt;
var i:longint;
begin
clrscr;
for i := 1 to 4 do
writeln('AAAAAA');
readln;
end.
program A01;
uses crt;
var x : byte;
begin
clrscr;
x := 1; while x <= 4 do
begin
writeln('AAAAAA');
x := x + 1;
end;
readln
end.
Câu hỏi trong lớp
Xem thêm