wayground logo

Free Printable Worksheets

Font size

S
M
L
XL
Worksheets

ĐVĐ - Lặp For - do

Total questions: 5

Worksheet time: 3mins

Name
Class
Date
1.

Tính S=1+12+13+14+...+1100S=1+\frac{1}{2}+\frac{1}{3}+\frac{1}{4}+...+\frac{1}{100}  là bài toán

a)

rẽ nhánh

b)

tính tổng phân số

c)

lặp với số lần biết trước

d)

lặp với số lần chưa biết trước

2.

Tính S=1a+1a+1+1a+2+1a+3+...+1a+100S=\frac{1}{a}+\frac{1}{a+1}+\frac{1}{a+2}+\frac{1}{a+3}+...+\frac{1}{a+100}  . Số lần lặp của bài toán này là

a)

1

b)

10

c)

50

d)

100

3.

Tính S=1+12+13+...+1100S=1+\frac{1}{2}+\frac{1}{3}+...+\frac{1}{100}  . Các câu lệnh nào sau đây đúng ?

a)

S:=0;

for i:=100 to 1 do S:=S+i;

b)

S:=0;

for i:=1 to 100 do S:=S+i;

c)

S:=0;

for i:=100 downto 1 do S:=S+i;

d)

S:=0;

for i:=1 downto 100 do S:=S+i;

4.

Đếm xem từ 1 đến 10 có bao nhiêu số chẵn ?

Các câu lệnh nào sau đây đúng?

a)

Dem:=0;

For i:=1 to 10 do if i mod 2 = 0 then Dem := Dem + 1;

b)

Dem:=0;

For i:=1 to 10 do if i mod 2 <> 0 then Dem := Dem + 1;

c)

Dem:=0;

For i:=1 downto 10 do if i mod 2 = 0 then Dem := Dem + 1;

d)

Dem:=0;

For i:=10 downto 1 do if i mod 2 = 0 then Dem := Dem + 1;

5.

Câu lệnh For - do nào sau đây đúng viết lên màn hình các số từ 1 đến 10 ?

a)

For i:= 10 to 1 do write(i:3);

b)

For i:= 1 to 10 do write(i:3);

c)

For i:= 10 downto 1 do write(i:3);

d)

For i:= 1 to 10 do write(3);