2 câu trả lời
program p03;
uses crt;
var
i : byte;
begin
clrscr;
for i := 1 to 10 do
writeln('pascal');
readln;
end.program p04;
uses crt;
var
i : byte;
begin
clrscr;
for i := 10 downto 1 do
writeln('pascal');
readln;
end.
Trong vòng lặp For – do kiểu dữ liệu của biến đếm là kiểu số nguyên(integer,byte,...)
Câu hỏi trong lớp
Xem thêm