Ngy son: 27 thỏng nm 2011 Ngy ging: 29 thỏng nm 2011 Tit 70 kiểm tra học kỳ ii I Mục tiêu: - Kin thc: Kiểm tra việc tiếp thu kiến thức HS HK II -K nng: Học sinh vận dụng tốt kiến thức học để làm kiểm tra có kết tốt - Thỏi : Rèn luyện ý thức tự giác kiểm tra II Chuẩn bị: - GV: Đề kiểm tra - HS: chuẩn bị ôn tập nhà Ma trn: Mc ch Bit Hiu Cõu lnh iu kin Cõu lnh lp 1 Lm vic vi dóy s 1 1 0,5 0,5 0,5 1 0,5 Cng 0,5 Lp vi s ln cha bit trc Cng Vn dng 0,5 14 III Phơng pháp: Làm viết giấy IV Tiến trình dạy ổn định: kiểm tra sĩ số lớp: Bài mới: Kiểm tra HK II 45 phút I/ Khoanh trũn ch cỏi ng trc phng ỏn em cho l ỳng: (4 im) Cõu 1: Lnh lp no sau õy l ỳng? A For = to ; B For := to ; C For := to ; D For : to ; Cõu 2: Vũng lp While ; l vũng lp: A Cha bit trc s ln lp B Bit trc s ln lp C Bit trc s ln lp nhng gii hn l =100 10 Cõu 3: Hóy tỡm hiu on chng trỡnh sau õy i:=1; j:=2; k:=3; While i5 then a:=b; else m := n; III/ Gch chõn di nhng cõu lnh em cho l sai ri vit li cõu lnh ú cho ỳng: (2 im) Program Tinhtong; Uses crt Var N i: Integer; S: Longint; BEGIN Clrscr; Write(Nhap vao so N = ); Readln(N); S:=0; For i:=1 to N S=S*1/i ; Writeln(Tong cua,N,so dau tien s = , s) Readln END IV/ Vit chng trỡnh gii quyt bi toỏn: (2 im) Vit chng trỡnh tớnh tng: S = 1+2+3++n Trong ú n l s nguyờn nhp t bn phớm - - ỏp ỏn I/ Khoanh trũn ch cỏi ng trc phng ỏn em cho l ỳng: (4 im) Cõu B Cõu A Cõu C Cõu A Cõu B Cõu C Cõu A Cõu B II/ in X vo cỏc ụ cho phự hp v gii thớch vỡ sao? (1 im) Cõu ỳng Sai Gii thớch a) for i=1 to 10 writeln('A'); X Thiu du : sau bin i b) var X: Array[510] Of Char; X Kiờu d liờu sai c) X:=10; while X=10 X := X+5; X d) if x>5 then a:=b; else m := n; X Tha du ; trc else III/ Gch chõn di nhng cõu lnh em cho l sai ri vit li cõu lnh ú cho ỳng: (2 im) Program Tinhthuong; Uses crt Var N i: Integer; S: Longint; BEGIN Clrscr; Write(Nhap vao so N = ); Readln(N); S:=0; For i:=1 to N S=S*1/i ; Writeln(Thuong cua,N,so dau tien s = , s) Readln END Uses crt; Var N, i: Integer; For i:=1 to N S:=S*1/i; Writeln(Thuong cua,N,so dau tien s = , s) IV/ Vit chng trỡnh gii quyt bi toỏn: (2 im) Program Tong; Uses crt; Var S: real; n, i: integer; Begin Clrscr; Write(Nhap so n = ); Readln(n); S:= 0; For i:= to n S: = S + i; Writeln(Tong can tim la: , S:6:2); Readln End  ... for ; Câu 7: Để tính tổng S =2 + + … + n; em chọn đoạn lệnh: a For i:=1 to n b For i:=1 to n if ( i mod 2) =0 then S:=S + i; S:= S + i ; c c For i:=1 to n d for i:=1 to n if ( i mod 2) =1... đầu> ] of ; B var : array […] of ; C var : array [ ] of ; D var ... lần lượt bao nhiêu? A 2, 3,4 B 7 ,2, 3 C 7,3,6 D 6,3,7 Câu 4: Sau thực đoạn chương trình sau, giá trị biến S bao nhiêu: s:=1; for i:=1 to s := s*i; A. 120 B 55 C 121 D 151 Câu 5: Phần thân chương