PHÒNG GD & ĐT AN LÃO Kiểm tra: 01 tiết Trường THCS AN TÂN Môn : Tin học Họ tên học sinh : . . . . . . . . . . . . . . . . . . . . . . . . . . . .Năm học: 2009-2010 Lớp : 8A . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Thời gian: 45 phút Điểm Lời phê của giáo viên Chữ ký phhs A. Trắc nghiệm (4 điểm) Câu 1: Hãy chọn phát biểu đúng nhất trong các phát biểu dưới đây: a. Trong ngôn ngữ lập trình biến được dùng để lưu trữ dữ liệu và dữ liệu được biến lưu trữ có thể thay đổi trong quá trình thực hiện chương trình. b. Có thể xem biến như là “tên” của vùng nhớ được dành riêng để lưu các dữ liệu có kiểu nhất đònh, giúp người viết chương trình truy cập chính xác đến dữ liệu đó. c. Biến có thể lưu dữ liệu do người sử dụng nhập vào máy tính hoặc cá kết quả tính trung gian. d. Tất cả phát biểu nói trên. Câu 2: Hãy chọn phát biểu đúng nhất trong các phát biểu dưới đây: a. Để có thể sử dụng được, biến và hằng trong chương trình, ta phải khai báo chúng trong phần khai báo. b. Ta chỉ cần khai báo tên biến mà không cần khai báo kiểu dữ liệu, chương trình sẽ tự động xác đònh kiểu dữ liệu mà biến có thể lưu trữ. c. Để khai báo một hằng, ta cần khai báo tên hằng và kiểu dữ liệu của hằng. d. Giá trò của hằng có thể thay đổi trong quá trình thực hiện chương trình. Câu 3: Xác đònh câu lệnh đúng trong các câu lệnh sau đây: a. if x:=7 then a=b; b. if x=7 then a:=b; c. if x=7 then a=b; d. if x=7; then a=b; Câu 4: Trong Pascal, khai báo nào sau đây là đúng: a. var dtb: real; b. var pi:=3.14; c. var r= 30; d. const x: real; Câu 5: Điền từ thích hợp vào chỗ trống: Câu lệnh lặp có số vòng lặp xác đònh có dạng: ……………………<biến đếm>:=<………………………> to <…………………………> …………………… <câu lệnh>; B. T ự luận (6 điểm) Câu 1: Mô tả thuật toán: tính tổng của N số tự nhiên đầu tiên ? (2 điểm) Câu 2: Viết chương trình nhập vào hai số A, B khác nhau, và in ra màn hình hai số đó theo thứ tự khơng giảm dần. (3 điểm) Câu 3: Hãy cho biết lệnh writeln in ra màn hình giá trò của j, k là bao nhiêu trong chương trình sau? (1 điểm) Uses crt; Var I,j,k: integer; begin J:=3; k:=3; For i:= 1 to 5 do If i mod 2 = 0 then j:= j +1; K:= k +j; Writeln(j, ‘ ‘, k); Readln End. PHÒNG GD & ĐT AN LÃO Kiểm tra: 01 tiết Trường THCS AN TÂN Môn : Tin học Họ tên học sinh : . . . . . . . . . . . . . . . . . . . . . . . . . . . .Năm học: 2009-2010 Lớp : 8A . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . . Thời gian: 45 phút Điểm Lời phê của giáo viên Chữ ký phhs A. Trắc nghiệm (4 điểm) Câu 1: Hãy chọn phát biểu đúng nhất trong các phát biểu dưới đây: a. Ta chỉ cần khai báo tên biến mà không cần khai báo kiểu dữ liệu, chương trình sẽ tự động xác đònh kiểu dữ liệu mà biến có thể lưu trữ. b. Để có thể sử dụng được, biến và hằng trong chương trình, ta phải khai báo chúng trong phần khai báo. c. Để khai báo một hằng, ta cần khai báo tên hằng và kiểu dữ liệu của hằng. d. Giá trò của hằng có thể thay đổi trong quá trình thực hiện chương trình. Câu 2: Hãy chọn phát biểu đúng nhất trong các phát biểu dưới đây: a. Có thể xem biến như là “tên” của vùng nhớ được dành riêng để lưu các dữ liệu có kiểu nhất đònh, giúp người viết chương trình truy cập chính xác đến dữ liệu đó. b. Trong ngôn ngữ lập trình biến được dùng để lưu trữ dữ liệu và dữ liệu được biến lưu trữ có thể thay đổi trong quá trình thực hiện chương trình. c. Biến có thể lưu dữ liệu do người sử dụng nhập vào máy tính hoặc cá kết quả tính trung gian. d. Tất cả phát biểu nói trên. Câu 3: Xác đònh câu lệnh đúng trong các câu lệnh sau đây: a. if x:=5 then a=b; b. if x=5 then a=b; c. if x=5 then a:=b; d. if x=5; then a=b; Câu 4: Trong Pascal, khai báo nào sau đây là đúng: a. var dtb: real; b. Const pi: real; c. var r = 30; d. Const x: real; Câu 5: Điền từ thích hợp vào chỗ trống: Câu lệnh lặp có số vòng lặp xác đònh có dạng: ……………………<biến đếm>:=<………………………> to <…………………………> …………………… <câu lệnh>; B. T ự luận (6 điểm) Câu 1: Mô tả thuật toán tìm số lớn nhất trong ba số A,B,C ? (2 điểm) Câu 2: Viết chương trình nhập vào hai số A, B khác nhau, và in ra màn hình hai số đó theo thứ tự giảm dần. (3 điểm) Câu 3: Hãy cho biết lệnh writeln in ra màn hình giá trò của j, k là bao nhiêu trong chương trình sau? (1 điểm) Uses crt; Var I,j,k: integer; begin J:=3; k:=3; For i:= 1 to 5 do If i mod 2 = 0 then j:= j +1; K:= k +j; Writeln(j, ‘ ‘, k); Readln End. ĐÁP ÁN ĐỀ 1 Câu 1: Thuật toán tính tổng N số tự nhiên đầu tiên: (2 điểm) Bước 1: Nhập 3 số A,B,C; (0,25 điểm) Bước 2: Max A; (0,5 điểm) Bước 3: Nếu B>Max, thì Max B; (0,5 điểm) Bước 4: Nếu C>Max, thì Max C; (0,5 điểm) Bước 5: Thông báo kết quả và kết thúc thuật toán. (0,25 điểm) Câu 2: Program sap_xep; (1đ) uses crt; var A,B: integer; Begin clrscr; write('Nhap so A = '); readln(A); (0.5đ) write('Nhap so B = '); readln(B); (0.5đ) if A>B then Write(B,’ ‘,A) else write (A,’ ‘,B); (1đ) readln end. Câu 3: Kết quả in ra màn hình: j=5; k=10 ĐÁP ÁN ĐỀ 2 Câu 1: Thuật toán tính tổng N số tự nhiên đầu tiên: (2 điểm) Bước 1: SUM 0; i 0. (0,5 điểm) Bước 2: i i + 1. (0,5 điểm) Bước 3: Nếu i < n, thì SUM SUM + i và quay lại bước 2. (0,5 điểm) Bước 4: Thông báo kết quả và kết thúc thuật toán. (0,5 điểm) Câu 2: Program sap_xep; (1đ) uses crt; var A,B: integer; Begin clrscr; write('Nhap so A = '); readln(A); (0.5đ) write('Nhap so B = '); readln(B); (0.5đ) if A<B then Write(B,’ ‘,A) else write (A,’ ‘,B); (1đ) readln end. Câu 3: Kết quả in ra màn hình: j=5; k=8 . & ĐT AN LÃO Kiểm tra: 01 tiết Trường THCS AN TÂN Môn : Tin học Họ tên học sinh : . . . . . . . . . . . . . . . . . . . . . . . . . . . .Năm học: 2009- 2010 Lớp : 8A . . . . . . . . . . . & ĐT AN LÃO Kiểm tra: 01 tiết Trường THCS AN TÂN Môn : Tin học Họ tên học sinh : . . . . . . . . . . . . . . . . . . . . . . . . . . . .Năm học: 2009- 2010 Lớp : 8A . . . . . . . . . . . then Write(B,’ ‘,A) else write (A,’ ‘,B); (1đ) readln end. Câu 3: Kết quả in ra màn hình: j=5; k =8