Em hãy nêu ý nghĩa từng dòng lệnh sau:
program Day_so_cua_Nga;
uses crt;
var i: interger;
begin
clrscr;
i:= 0;
while i <= 20 do
begin
writeln (i);
i:= i + 1;
end;
readln;
end.
Em hãy nêu ý nghĩa từng dòng lệnh sau:
program Day_so_cua_Nga;
uses crt;
var i: interger;
begin
clrscr;
i:= 0;
while i <= 20 do
begin
writeln (i);
i:= i + 1;
end;
readln;
end.
@Meoss_
program Day_so_cua_Nga;
→ Tên CT ( chương trình )
uses crt;
→ Nơi chạy CT
var i: interger;
→ Khai báo biến i thuộc kiểu dữ liệu số nguyên
begin
→ Bắt đầu CT
clrscr;
→ Dừng màn hình khi chạy CT
i:= 0;
→ Gán i có giá trị là 0
while i <= 20 do
→ Nếu i nhỏ hơn hoặc bằng 20, CT làm việc
begin
→ Bắt đầu chương trình nhỏ
writeln (i);
→ In ” i ”
i:= i + 1;
→ Gán i sau mỗi lần lặp sẽ tăng lên 1 đơn vị
end;
→ Kết thúc CT nhỏ
readln;
→ In màn hình
end.
→ Kết thúc cả CT
dòng 1: tên chương trình
dòng 2:khai báo thư viện
dòng 3:khai báo biến i theo kiểu integer
dòng 4:bắt đầu chương trình
dòng 5 :xóa màn hình
dòng 6 :i được gán bằng không
dòng 7:trong khi i bé hơn hoặc bằng 20 thì thực hiện câu lệnh
dòng 8:bắt đầu chương trình con
dòng 9 đưa i ra màn hình
dòng 10:i được cộng thêm 1 rồi quay lại dòng 7 so sánh điều kiện
dòng 11 :kết thúc chương trình con
dòng 12: dừng màn hình
dòng 13: kết thúc chương trình