Câu 15. Trong câu lệnh lặp for i:=2 to 100 do begin  end; câu lệnh ghép được thực hiện bao nhiêu lần (hay bao nhiêu vòng lặp được thực hiện)?

A. 102             B. 101                         C. 100             D. 99

Câu 16. Xem ví dụ sau trong pascal:

Uses crt; Var i:integer;       

Begin

            Clrscr; I:=1; while i < 14 do begin Writeln(‘0’); i := i+1; End; Readln; End.

Ví dụ trên ghi ra màn hình bao nhiêu chữ số 0?

A. 14;              B. 13;              C. 15;                          D. 16;

Câu 17. điều kiện trong câu lệnh lặp với số lần chưa biết trước thường là :

A. Phép gán    B. Câu lệnh đơn          C. Câu lệnh ghép        D. Phép so sánh

Câu 18. câu lệnh lặp For i:=1 to 5 do Writeln(‘Day la lan lap thu ‘,i); sẽ in ra màn hình 5 dòng chữ trong đó dòng thứ 3 có nội dung là:

A. Day la lan lap thu i                         B. Day la lan lap thu, i

C. Day la lan lap thu 3                        D. Day la lan lap thu , 3

Phần I. Trắc nghiệm. (5 điểm)
1. Nhặt thóc ra khỏi gạo cho đến khi trong gạo không còn lẫn thóc là hoạt động:
a. Lặp 10 lần c. Lặp vô số lần (lặp vô hạn)
b. Lặp với số lần chưa biết trước d. Lặp với số lần biết trước
2. Trong câu lệnh lặp For i:=1 to 10 do begin.... end bao nhiêu vòng lặp được thực hiện?
a. Không lần nào b. 10 lần c. 1 lần d. 2 lần
3. Điều kiện kết thúc vòng lặp For... do của Pascal là:
a. Biến đếm lớn hơn giá trị cuối c. Giá trị đầu bằng giá trị cuối
b. Biến đếm lớn hơn hoặc bằng giá trị cuối d. Giá trị đầu lớn hơn giá trị cuối
4. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. For i:=1 to 10; do x=x+1; c. For i:=1 to 10 do x:=x+1;
b. For i:=10 to 1 do x:=x+1; d. For i:=1.5 to 10 do x:=x+1;
5. Trong lệnh lặp For... do của Pascal, sau từ khóa “do” nếu có từ 2 câu lệnh trở lên (câu lệnh
ghép) thì câu lệnh ghép đó phải đặt trong cặp từ khóa nào sau đây?
a. Begin.....readln; b. Begin.....and;
c. End.....Begin d. Begin.....end;
6. Câu lệnh sau đây cho kết quả như thế nào?
For i:=1 to 10 do Writeln(‘A’);
a. In dãy số từ 10 đến 1 ra màn hình c. In dãy số từ 1 đến 10 ra màn hình
b. In 20 ký tự A ra màn hình d. In 10 ký tự A ra màn hình
7. Sau khi thực hiện đoạn chương trình sau, giá trị của biến T bằng bao nhiêu?

i := 0; T := 0;
While i &lt; 3 do
begin T := T + 1; i := i + 1; end;

a. T = 2 b. T = 3 c. T = 4 d. T = 5
8. Cú pháp của câu lệnh lặp với số lần chưa biết trước trong Pascal:
a. While <câu lệnh> do <điều kiện>; c. While <điều kiện> do <câu lệnh>;
b. While <giá trị cuối > do <giá trị đầu>; d. While <giá trị đầu> do <giá trị cuối>;
9. Trong lệnh lặp While... do của Pascal, nếu điều kiện đúng thì:
a. Tiếp tục vòng lặp c. Vòng lặp vô tận
b. Lặp 10 lần d. Thoát khỏi vòng lặp
10. Trong các câu lệnh Pascal sau, câu lệnh nào hợp lệ?
a. x:=1; while x:= 10 do x:=x+5; c. x =1 while x>10 do x:=x+5;
b. x:=1; while x <10 do x:=x+5; d. x:=10; while x<10 do x=x+5;
Phần II. Bài tập. (5 điểm)
Câu 1: Cho đoạn chương trình sau: (2đ)

m:=2; k:=3;
For i:= 0 to 4 do begin

m:=m+1;
k :=k+m;
end;

Sau khi thực hiện đoạn chương trình trên giá trị của các biến m, k bằng bao nhiêu?
1. Câu 2: (3đ)Viết chương trình tính tổng: S= 1+ 1/2 + 1/3 + ….. + 1/N

(n là số nguyên được nhập từ bàn phím)

Làm giúp mình trước ngày 29/04/2020 nha !

I. PHẦN LÍ THUYẾT

câu 1:cho đoạn chương trình sau:

S:=0;

For i:= 1 to 6 do S:=S+i;

Tính giá trị của S?

II. PHẦN BÀI TẬP:

câu 1: Viết chương trình tính tích của 10 số tự nhiên đầu tiên.

Câu 2: Hãy phát biểu sự khác biệt giữa câu lệnh lặp với số lần lặp cho trước và câu lệnh lặp với số

lần lặp chưa biết trước.

Câu 3: Hãy tìm hiểu đoạn chương trình Pascal sau đây và cho biết với đoạn lệnh đó chương trình

thực hiện bao nhiêu vòng lặp?

S:=1; n:=0;

While S <=10 do

Begin

n:=n+1;

S:=S+n;

End;