Vòng lặp while .... do là vòng lập?. Lặp với số lần chưa biết trước; BA. Lặp với số lần đã biết trước; C.. Không biết khi nào kết thức.. Cấu trúc của khai báo vòng lặp while … do như sau
Trang 1PHÒNG GD – ĐT PHÙ CÁT
TRƯỜNG THCS CÁT KHÁNH
HỌ VÀ TÊN: ………
LỚP :……
KIỂM TRA 1 TIẾT MÔN: TIN HỌC THỜI GIAN: 45 phút
ĐIỂM
I TRẮC NGHIỆM 5 (điểm)
Câu 1 Đoạn lênh sau đây:
So:=1;
While so<10 do writeln(so);
So:=so+1;
Sẽ cho kết quả gì?
A In ra các số từ 1 đến 9;
B In ra các số từ 1 đến 10
C In ra vô hạn các số 1, mỗi số trên một dòng;
D In ra vô số các số 1 mỗi số một dòng;
Câu 2 Tìm hiểu đoạn lệnh chương trình Pascal sau đây Không cần biết chương trình, hãy cho biết lệnh writeln in ra màn hình giá trị của i, j, k là bao nhiêu?
i:=1; j:=2; k:=3;
While i<6 do i:=i+1; j:=j+1; k:=k+j;
Writeln(i,’ ’,j,’ ’k);
Chọn đáp án đúng
A i=6,j=3,k=6; B i=6;j=3;k=3; C i=6, j=4, k=6; D Tất cả đều đúng
Câu 3 Hãy tìm hiểu đoạn chương trình sau đây:
X:=0; tong:=0;
While tong<=20 do
Begin
Writeln(tong);
Tong:= tong+1;
End;
X:=tong;
Sau đoạn chương trình trên được thực hiện, giá trị của x bằng bao nhiêu?
A 20; B 21; C Không xác định được; D 0;
Câu 4 Tìm hiểu đoạn lệnh chương trình Pascal sau đây Không cần biết chương trình, hãy cho biết lệnh writeln in ra màn hình giá trị của i, j, k là bao nhiêu?
i:=1; j:=2; k:=3;
While i<6 do
Begin i:=i+1; j:=j+1; k:=k+j;end;
Writeln(i,’ ’,j,’ ’,k);
Chọn đáp áp đúng:
A i=6, j=7, k=28; B i=6;j=3; k=28; C i=6, j=7, k=6; D Tất cả đều đúng Câu 5 Các khai báo biến mảng nào sau đây là sai?
A a: array[1 100]of integer; B, mang:array[1 1]of real;
C diem:array[1…100]of integer; D hs:array[1 10] of longint;
Câu 6 Để gán trực tiếp một giá trị 2 vào phần tử 2 trong mãng có tên là “diem” thì phải làm như sau?
Trang 2A Diem[i]:= 2; B diem2:=2; C Diem[2]:=2; D Diem[2]: =2; Câu 7 Vòng lặp while do là vòng lập?
A Lặp với số lần chưa biết trước; B Lặp với số lần đã biết trước;
C Không biết khi nào kết thức D Cả 3 đều đúng
Câu 8 Cấu trúc của khai báo vòng lặp while … do như sau?
A while <điều kiên> do <câu lệnh>; B while <câu lệnh> do <câu lệnh>;
C while <điều kiện> do <câu lệnh1>else <câu lệnh 2>;
D A và C đúng
Câu 9 Câu lệnh nào sai :
A. While X<n do m:=m+1; B. While X>n do m:=m+1;
C. While X<n do begin m:=m+1; x:=x+3 end; D. While X:=n do m:=m+1; Câu 10 Sau khi thực hiện đoạn chương trình sau :
i:=1; s:=0;while s< 2 do begin write(i*s ); s:=s+1 end;
kết quả in ra màn hình là :
A. 0
B. 1
C. 2
D. 3
II TỰ LUẬN (5điểm)
Câu 1(1 điểm) Viết chương trình sử dụng câu lệnh lặp while … do để tính tổng
n
3
1 2
1
1
Câu 2 (2điểm) Các khai báo biến mảng sau đây đúng hay sai( Nếu sai phải sửa lại)?
a var x: array[10…13] of integer;
b var x: array[5 13.5] of real;
c var x: array[10 1] of longint;
d var x: array(10 13) of integer;
Câu 3 (2 điểm) Hãy tìm hiều các thuật toán sau đây và cho biết khi thực hiện thuât toán, máy tính sẽ thực hiện bao nhiêu vòng lặp (ghi rõ từng vòng lập)? Khi kết thúc, giá trị của
S bằng bao nhiêu? Viết chương trình Pascal thể hiện thuật toán đó
Thuật toán
Bước 1 S 10 ,x 0 5
Bước 2 Nếu S 5 2 ,chuyển tới bước 4
Bước 3 S Sx và quay lại bước 2
Bước 4 Thông báo S và kết thúc thuật toán