nêu cú pháp câu lệnh lặp với số lần biết trước ? Lấy ví dụ
viết chương trình tính tổng của dãy số sau bằng cách sử dụng vòng lặp :
For…do A= 1+2+3+4………….. +100
cú pháp của câu lệnh lặp với số lần chưa biết trước là
a, If <Điều kiện>then
b, For
c,While<điều kiện>do
d, Var i,n: integer
– Cú pháp:
for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
– Ctrinh:
uses crt;
var i,s:integer;
begin
clrscr;
s:=0;
for i:=1 to 100 do s:=s+i;
write(‘A=’,s);
readln;
end.
– Cú pháp: while <điều kiện> do <câu lệnh>;
=> C
Cú pháp:
for <biến đếm>:=<giá trị đầu> to <giá trị cuối> do <câu lệnh>;
Vd: in các số từ 1 đến 10 với biến đếm là i
for i:=1 to 10 do writeln(i);
Chương trình:
program tinh_tong;
uses crt;
var i,a:integer;
begin
clrscr;
a:=0; i:=1;
while i<=100 do
begin
a:=a+i;
i:=i+1;
end;
write(‘A= ‘,a);
readln;
end.
Đáp án: C