0
0
Hãy luôn nhớ cảm ơn và vote 5*
nếu câu trả lời hữu ích nhé!
2288
1725
- 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
Hãy giúp mọi người biết câu trả lời này thế nào?
2863
21140
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
Hãy giúp mọi người biết câu trả lời này thế nào?
Bảng tin
0
0
0
nốt đi