KHÁM PHÁ Học Toán + Tiếng Anh theo Sách Giáo Khoa cùng học online và gia sư dạy kèm tại nhà từ lớp 1 đến lớp 12 với giá cực kỳ ưu đãi kèm quà tặng độc quyền"CỰC HOT".
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,…)
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.