Khoanh trũn vào cõu đỳng
Cõu 1: Vũng lặp while…Do là vũng lặp: A. Chưa biết trước số lần lặp B. Biết trước số lần lặp
C. Biết trước số lần lặp nhưng giới hạn là 100 D. Biết trước số lần lặp nhưng giới hạn là 500
Cõu 2: Cỏch khai bỏo mảng sau đõy cỏch nào khai bỏo đỳng ?
A. var X: Array [10, 13] of integer; C. var X: Array [3.4..4.8] of integer; B. var X: Array [10.. 1] of integer; D. var X : Array [1..1.0] of real; Cõu 3: Cho S và i là biến nguyờn. Khi chạy đoạn chương trỡnh :
S: =0;
For i: =1 to 3 do s: = s+i; writeln(s); Kết quả in lờn màn hỡnh là của s là :
A.3 B. 5 C. 5 D.6
Cõu 4: Lần lượt thực hiện đoạn lệnh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1; Giỏ trị của t là
A. t=4 B. t=6 C. t=8 D. t=0
Cõu 5: Cõu lệnh pascal nào sau đõy là hợp lệ?
A.For i= 1 to 10 do writeln(‘A’); B. For i: =1.5 to 10.5 do writeln(‘A’); C. For i:= 1 to 10 do writeln(‘A’); D. For i: =100 to 1,8 do writeln(‘A’); Cõu 6 : Cõu lệnh lặp while…do cú dạng đỳng là:
E. X:=10; While x:=10 do x:=x+5 F. x:=10 While x=10 do x:=x+5; G. x:=10; While x:=10 do x=x+5; H. x:=10; While x=10 to x:=x+5; Cõu 7 : Vũng lặp for ..do là vũng lặp:
E. Biết trước số lần lặp F. Chưa biết trước số lần lặp G. Biết trước số lần lặp
nhưng giới hạn là <=50
H. Biết trước số lần lặp nhưng giới hạn là >=50 Cõu 8: Cõu lệnh nào sau đõy là cõu lệnh nhập cho phần tử thứ 10 của biến mảng A?
a. Readln(A10]); b. Readln(A[10]);
c. Readln([i]); d. Readln(A10);
II. PHẦN TỰ LUẬN 8 đ
Cõu1 : Hóy sắp xếp lại đọan chương trỡnh sau cho đỳng var S, n : integer; S:=0; n:=1; while S<=100 do n:=n+1; S:=S+n; end;
writeln('So n nho nhat de tong > 100 la ',n); readln
end. Begin begin
writeln('Tong dau tien > 100 la ',S); Cõu 2.
a.Viết chương trỡnh tớnh tổng 50 số tự nhiờn bằng vũng lặp for…do
B. Đỏp ỏn + biểu điểmCõu Đỏp ỏn Điểm Cõu Đỏp ỏn Điểm Trắc nghiệm 1 A 0.25 2 B 0.25 3 D 0.25 4 B 0.25 5 C 0.25 6 C 0.25 7 A 0.25 8 B 0.25 Tự luận 1 Program tong; var S, n : integer; begin clrscr; S:=0; n:=1; while S<=100 do begin n:=n+1; S:=S+n; end;
writeln('So n nho nhat de tong > 100 la ',n); readln end. 4 2 Program tong50; var S, i : integer; begin clrscr; S:=0; For i:=1 to 50 do S:=S+i; end;
writeln('vay tong 50 so la:= ',s); readln
End.
4
TRẢ BÀI KIỂM TRA HỌC KỲ II – Thực hành I - MỤC TIấU
1. Kiến thức
- Học sinh nắm vững kiến khai bỏo biến, bài làm việc với dóy số
2. Kỹ năng
- Cú kĩ năng thao, phõn biệt cỏch khai bỏo, chương trỡnh, viết chương trỡnh
3. Thỏi độ
- Nghiờm tỳc làm bài kiểm tra, phỏt huy hết khả năng, vốn kiến thức.
II. Chuẩn bị
1. Giỏo viờn: Phũng mỏy tớnh, đề bài kiểm tra.2. Học sinh: Cỏc kiến thức, kĩ năng đó học. 2. Học sinh: Cỏc kiến thức, kĩ năng đó học. III - Phơng phỏp
- Thực thi trờn giấy.
IV - Tiến trỡnh bài dạyA - ổn định lớp A - ổn định lớp