cách tính được số lần lặp dựa vào biến đếm là ?
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Câu 16: (0,25đ) Trong các cách viết câu lệnh lặp với số lần định trước như sau, cách nào đúng?
A. For <biến đếm> := <giá trị đầu> to <giá trị cuối> ;do <câu lệnh>
-> Sai vì trước do có dấu ;
B. For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
C. For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh>
-> sai vì kết thúc câu lệnh không có dấu ;
D. For <biến đếm> = <giá trị đầu> to <giá trị cuối> do <câu lệnh>;
-> sai vì sau <biến đếm> không có dấu :
B. Lặp với đếm từ số đếm đầu đến số đếm cuối: Các thao tác cần lặp Hết lặp
Chương trình đầy đủ:
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 2=0 then t:=t+i;
writeln(t);
readln;
end.
giúp tớ với tớ không hiểu ạ