Điểm Lời phê của cô giáo Đề 1 Câu 1: <2điểm> Viết các biểu thức sau dưới dạng biểu diễn tương ứng trong Pascal. a. 1 a (b 2) x 5 − + b. 5 4 1 7 4 [( ( )] 4 3 4 3 5 × + − − c. 2 2 (10 5) 24 (3 5) + − + d. 15 5 2 a + × Câu 2: <2điểm> Viết các biểu diễn trong Pascal sang dạng biểu thức toán học. a. (a+b)*(a+b)-x/y b. 1+x*2+1/2*3+x+3*4+x/4*x c. b/(a*a+c) d. 2/3*[(4+1/5)+(1/5+1/3)] Câu 3: <2điểm> Vẽ sơ đồ, nêu cú pháp và ý nghóa của câu lệnh lặp với số lần chưa biết trước While Do, Repeat Until ? Câu 4: <4điểm> Viết chương trình nhập vào ba số nguyên a, b, c . Tính a 2 + b 2 – c 2 và xuất kết quả ra màn hình. Bài làm . . . . . . . Phòng Giáo Dục – Đào Tạo M’drăk Trường THCS Lý Tự Trọng Lớp: . Tên: . KIỂM TRA CHẤT LƯNG HKII Năm học: 2008 - 2009 Môn Tin học lớp 9 Thời gian: 45 phút ĐÁP ÁN – ĐỀ 1 Câu 1: <2điểm> Viết các biểu thức sau dưới dạng biểu diễn tương ứng trong Pascal. a. 1 a (b 2) x 5 − + → 1/ x – x/5*(b+2) b. 5 4 1 7 4 [( ( )] 4 3 4 3 5 × + − − → 5/4*((4/3+1/4-(7/3-4/5))) c. 2 2 (10 5) 24 (3 5) + − + → [(10+5)*(10+5) / (3+5)*(3+5)] – 24 d. 15 5 2 a + × → (15+5) * a/2 Câu 2: <2điểm> Viết các biểu diễn trong Pascal sang dạng biểu thức toán học. a. (a+b)*(a+b)-x/y → (a+b) 2 - x y b. 1+x*2+1/2*3+x+3*4+x/4*x → (1 ) (2 1) (3 4 ) (2 3 ) 4 x x x x x x x + + + + + c. b/(a*a+c) → 2 b a c+ d. 2/3*((4+1/5)+(1/5+1/3)) → 2 1 1 1 (4 ) ( ) 3 5 5 3 + + + Câu 3: <2điểm> Vẽ sơ đồ, nêu cú pháp và ý nghóa của câu lệnh lặp với số lần chưa biết trước While Do, Repeat Until ? * While Do a) Có ph¸p: WHILE <điều kiện> DO <Cơng việc> b) ý nghÜa: Trong khi mà điều kiện còn đúng thì cứ thực hiện Cơng việc, rồi quay trở về kiểm tra điều kiện lại. Vòng lặp được tiếp tục, đến khi điều kiện đặt ra khơng còn đúng nữa thì đi tới thực hiện lệnh tiếp theo * Repeat Until a) Có ph¸p: b) ý nghÜa: Nếu điều kiện logic là Sai (False) thì lặp lại lệnh cho đến khi điều kiện Ðúng thì mới thốt ra khỏi cấu trúc REPEAT UNTIL. Câu 4: <4điểm> Viết chương trình nhập vào ba số nguyên a, b, c . Tính a 2 + b 2 – c 2 và xuất kết quả ra màn hình. Câu 4 Nội Dung Điểm Program bai4; Uses crt; Var a, b, c : integer; 1.5 Begin Clrscr; write(‘ nhap a=’);readln(a); write(‘ nhap b=’);readln(b); write(‘ nhap c=’);readln(c); 1 write(‘ Tinh la: ’); writeln(a*a+b*b-c*c); 1 Readln; End. 0.5 . Lớp: . Tên: . KIỂM TRA CHẤT LƯNG HKII Năm học: 2008 - 2009 Môn Tin học lớp 9 Thời gian: 45 phút ĐÁP ÁN – ĐỀ