Bai tap while-do

-Mỗi nhóm trả lời thứ tự các câu hỏi trắc nghiệm, gồm 10 câu chọn phương án đúng nhất trong thời gian là 30s/ 1câu Mỗi câu trả lời đúng sẽ được cộng 10 điểm.. Trả lời sai sẽ được 0 điể

-Mỗi nhóm trả lời thứ tự các câu hỏi

trắc nghiệm, gồm 10 câu (chọn phương án đúng nhất) trong thời gian là

30s/ 1câu

Mỗi câu trả lời đúng sẽ được cộng 10

điểm Trả lời sai sẽ được 0 điểm.

- Với 10 câu hỏi, GV sẽ tổng số điểm mà

đội trả lời được.

Trắc Nghiệm

A Tính tổng các số tự nhiên từ 1 đến 20.

B Nhập vào 1 số cho đến khi số nhập vào là số chẵn thì dừng

D Mỗi ngày học bài 2 lần.

C Nhập các số nguyên từ bàn phím cho đến khi đủ 50 số.

KQ

Câu 1:

Trong các hoạt động dưới đây, hoạt động nào là hoạt

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

A Một giá trị bất kỳ

B Một giá trị khác không

D Tăng thêm một đơn vị (+1)

C Giảm một đơn vị (-1)

Câu 2:

-Trong vòng lặp For <biến đếm>:=<giá trị đầu> to

<giá trị cuối> do <câu lệnh> củaPascal, trong mỗi vòng lặp, biến đếm thay đổi như thế nào

A Biết trước số lần lặp nhưng giới hạn là <=100

B Biết trước số lần lặp nhưng giới hạn là >=100

Với ngôn ngữ lập trình Passcal câu lệnh lặp for i:=1 to

10 do x:=x+1; thì biến đếm i phải được khai báo là kiểu dữ liệu

Lần lượt thực hiện câu lệnh

for i:= 1 to 3.5 do writeln(i); sẽ in ra màn hình?

A 11

B 55

D 51

C 15

Caâu 7:Sau khi thực hiện đoạn chương trình sau,

giá trị của biến S bằng bao nhiêu:

s:=0;

While i < 5 do s := s+i;

A 4

D 10

Câu 8: Sau khi thực hiện đoạn chương trình

j:= 0; for i:= 1 to 3 do j:=j+2; thì giá trị in ra màn hình là?

A 6

D 25

C 15

Câu 9: Sau khi thực hiện đoạn chương trình

j:= 0; While i <6 do j:=j+5; thì giá trị in ra màn hình là?

-Mỗi nhóm phải làm bài vào bảng phụ, gồm 3 bài (ghi rỏ, đẹp) trong thời gian là 10 phút/ 1câu

Mỗi câu trả lời đúng sẽ được cộng 20

điểm (sai 1 lỗi trừ 1 điểm đối với bài gần đúng) Trả lời sai sẽ được 0 điểm.

- Với 3 bài tập, GV sẽ tổng số điểm mà

đội trả lời được.

Kiến Thức

Hãy hồn thiện chương trình tính tổng n số tự nhiên đầu tiên cho

đến khi S<=500 Cho biết N

S:=0 N:=0 While S<= do N:= N+1

S:= S+N Writeln(‘So N de tong >1000 la’,N);

Writeln(‘Gia tri cua tong S =',S);

Bài

1

S:= S+N;

End;

Writeln(‘So N de tong >1000 la’,N); Writeln(‘Gia tri cua tong S =',S); Readln;

End.

-Nêu cú pháp, và mơ tả hoạt động của câu lệnh lặp while … do?

- Vẽ lưu đồ vịng lặp while … do?

*Trong Pascal, cú pháp câu lệnh lặp với số lần chưa biết trước có dạng:

While < điều kiện> do <câu lệnh> ;

sau:

sẽ bị bỏ qua và việc thực hiện lệnh lặp

hiện câu lệnh và quay lại bước 1.

Bài

2

var i: integer; S: longint;

hồn chỉnh

Bài 3

9 3

6