TỰ LUẬN: 5 điểm Câu 1./1.5 điểm Trình bày cú pháp và hoạt động và cách xác định số vòng lặp của câu lệnh lặp trong ngôn ngữ lập trình Pascal?. Câu 2./ 1.5 điểm Biến là gì?[r]
(1)(2) UBND HUYỆN HOÀI NHƠN PHÒNG GD-ĐT HOÀI NHƠN Họ và tên :………………………… Trường : ………………………… Lớp : …………………SBD…………… Điểm số Điểm chữ ĐỀ KIỂM TRA HỌC KỲ I Môn : Tin học - Ngày thi :… /… /2012 Thời gian: 45 phút ( không kể thời gian phát đề) Giám thị Giám khảo1 Giám thị Giám khảo Mã phách Mã ghi lại A TRẮC NGHIỆM: (5 điểm) Đề I I./ (3 điểm) Hãy khoanh tròn vào chữ cái đứng trước câu trả lời đúng nhất: Câu 1./ Chương trình dịch là gì? a./ Chương trình dịch ngôn ngữ lập trình thành ngôn ngữ máy b./ Dùng để viết chương trình c./ Là chương trình tính toán d./ Là chương trình giúp máy tính thực lệnh người Câu 2./ Kết hiển thị trên màn hình câu lệnh writeln(‘12+23=’, 12+23) là a./ 12+23=12+23 b./ 35 c./ 12+23=’12+23’ d./ 12+23=35 Câu 3./ Phần thân chương trình Pascal thường bắt đầu và kết thúc bởi cặp từ khóa: a /begin và end: b /begin và end c./ begin: và end d./ begin và end; Câu / Muốn khai báo biến ta sử dụng từ khóa a./ uses b./ cont c./ const d./ type Câu 5/ Kết phép toán -13 div = a./ b./ -3 c./ -2.4 d./ -2 Câu 6./ Kết phép so sánh sau là x + 2< a./ Đúng b./ Sai c./ không có kết d./ Đúng hay sai phụ thuộc vào giá trị x Câu 7./ Biểu thức toán học ax +bx+c viết kí hiệu pascal là a./ a*x*2+b*x+c; b./ a* x*x +b*x+c; c./ a*x^2+b*x+c; d./ a x.x+b.x+c Câu 8./ Biểu thức pascal b*b/(a*a+c) viết toán học là b2 b*2 b*2 b 2 a./ a c b/ a c c./ a * c d./ a c Câu Giả sử y là biến kiểu liệu số thực Phép gán nào sau đây hợp lệ ? a./ y :=’123’ ; b./ y :=’abc’ ; c./y :=123 ; d./ y=123 ; Câu 10 Câu lệnh nào sau đây dùng để nhập số từ bàn phím vào biến x? A Write(‘Nhập x = ’); B Read(x); C Writeln(x); D Readnl(x); Câu 11 Giá trị x là bao nhiêu? trước đó giá trị x 5: if x mod 2=1 then x:=x+1; a./ b./4 c./ d./ Câu 12 Có đoạn chương trình: x:=2; y:=5; for i:=1 to x:=x+1; y:=y+x; writeln(x,’ ‘,y); a./ b./ 10 c./ 10 d./ 17 II./ (1 điểm) Điền các cụm từ sau vào chỗ trống(…) để câu hoàn chỉnh: Để tạo chương trình máy tính, chúng ta cần viết chương trình ……(1) Tuy nhiên máy tính chưa hiểu các chương trình nên cần có (2) để chuyển đổi sang ngôn ngữ mà máy tính hiểu Khi viết chương trình tên chương trình phải ……(3) với đại lượng khác tên không trùng với các … (4)…… (3) III./ (1 điểm) Hãy thay đổi trật tự các câu lệnh và sửa các lỗi sai để chương trình đúng Program Tinh_Tich{tích các số tự nhiên } Var N, i: integer S: longint; Begin Write(‘Nhap N= ‘) Readln(N); Sửa lại S:=0; Writeln(‘Tong la’, S); For i:= to N S:=S+i; Readln; End B TỰ LUẬN: (5 điểm) Câu 1./(2 điểm) Trình bày cú pháp và hoạt động câu lệnh điều kiện dạng thiếu và dạng đủ ngôn ngữ lập trình Pascal? Câu 2./ (1 điểm) Nêu giống và khác biến và hằng? Câu 3./ (2 điểm) Viết chương trình tính tổng các số chẳn N số tự nhiên đầu tiên với N là số tự nhiên nhập vào từ bàn phím Bài làm: A./ I Chọn đáp án đúng nhất: câu 0.25 đ Câu Đ án 10 11 12 II) Điền từ câu đúng 0.25 đ 1…… 2…… 3……… 4…… B./ TỰ LUẬN: đ (4) HƯỚNG DẪN CHẤM BÀI KIỂM TRA HK1 –MÔN TIN HỌC – ĐỀ I A TRẮC NGHIỆM: (5 điểm) I./ Mỗi ý đúng 0.25 điểm Câu Đ Án A D B C D D B B C 10 B 11 D 12 C II./ Mỗi ý đúng 0.25 điểm 1) Ngôn ngữ lập trình 2) Chương trình dịch 3) Khác 4) Từ khóa III./ (1 điểm) Mỗi ý đúng 0.25 điểm Program Tinh_Tich{tích các số tự nhiên } Var N, i: integer S: longint; Begin Write(‘Nhap N= ‘) Readln(N); S:=0; Writeln(‘Tong la’, S); For i:= to N S:=S+i; Readln; End Sửa lại Program Tinh_Tich{tích các số tự nhiên } Var N, i: integer; S: longint; Begin Write(‘Nhap N= ‘) Readln(N); S:=1; For i:= to N S:=S*i; Writeln(‘Tich la’, S); Readln; End B TỰ LUẬN: (5 điểm) Câu 1./ a) Dạng thiếu: - Cú pháp: if <ĐK> then <câu lệnh>; (0.5 điểm) - Hoạt động: CT kiểm tra ĐK này, ĐK thỏa mãn, thì CT thực câu lệnh sau từ khóa then, ngược lại câu lệnh bị bỏ qua (0.5 điểm) b) Dạng đủ: - Cú pháp: if <ĐK> then <câu lệnh1> else <câu lệnh2>; (0.5 điểm) - Hoạt động: CT kiểm tra ĐK này, ĐK thỏa mãn, thì CT thực câu lệnh sau từ khóa then, ngược lại câu lệnh thực (0.5 điểm) Câu 2./ - Giống nhau: Mặc dù cùng phải khai báo trước có thể sử dụng chương trình (0.5 điểm) - Sự khác biến và là: Giá trị biến thì có thể thay đổi từng thời điểm thực chương trình (0.25 điểm) Giá trị không thay đổi suốt quá trình thực chương trình (0.25 điểm) Câu 3./ (2 điểm) Program Tinh_tong; Var N, i: integer; P: longint; Begin Write(‘Nhap so N= ’); Readln(N); P:= 0; For i:= to N If i mod =0 then P:=P+i; Writeln(‘Tong cac so chan cua’, N,’ so tu nhien dau tien P= ‘,P); Readln; End (5) UBND HUYỆN HOÀI NHƠN PHÒNG GD-ĐT HOÀI NHƠN ĐỀ KIỂM TRA HỌC KỲ I Môn : Tin học - Ngày thi :… /… /2012 Thời gian: 45 phút ( không kể thời gian phát đề) Họ và tên :………………………… Trường : ………………………… Lớp : …………………SBD…………… Điểm số Điểm chữ Giám thị Giám khảo1 Giám thị Giám khảo Mã phách Mã ghi lại A TRẮC NGHIỆM: (5 điểm) Đề II I./ (3 điểm) Hãy khoanh tròn vào chữ cái đứng trước câu trả lời đúng nhất: Câu 1./ Con người viết chương trình để a./ Hướng dẫn máy tính thực các công việc cần thiết b./ Nghe nhạc hay soạn thảo văn c./ Máy tính hiểu sở thích người d./ Máy tính hoạt động Câu 2./ Ngôn ngữ lập trình bao gồm? a./ Bảng chữ cái tiếng anh b./ Bảng chữ cái và các phép toán ( +,-,*,/ ) c./ Từ khóa và bảng chữ cái d./ Bảng chữ cái và các quy tắc Câu 3./ Các tên sau đây, tên nào hợp lệ a./ a; b./ tam giac; c./ vidu; d./ abc Câu 4/ Kết hiển thị trên màn hình câu lệnh writeln(’15-11=’, ‘15-11’) là a./ 1115-11=-4 b./ -4 c./ 15-11=, ‘15-11’ d./ 15-11=15-11 Câu 5./ Từ nào sau đây không phải là từ khóa: a program b.end c exel d.begin Câu 6./ Khai báo biến x kiểu kí tự ta thực a./ Var x: integer; b./ var x: string; c./ Var x: char; d./ type x:array[1 10] of char; Câu 7./ Kết phép so sánh sau là 10-x > a./ Đúng b./ Sai c./ không có kết d./ Đúng hay sai phụ thuộc vào giá trị x Câu 8./ Biểu thức toán học -ax -bx+c viết kí hiệu pascal là a./ a*x*2+b*x+c; b./ -a* x*x -b*x+c; c./ a*x^2+b*x+c; d./ a x.x+b.x+c Câu Giả sử x là biến kiểu liệu xâu Phép gán nào sau đây hợp lệ ? a./ x :=3 ; b./ x :=’3’ ; c./ x := “3”; d./ x:=(3) ; Câu 10 Câu lệnh nào sau đây dùng để nhập số từ bàn phím vào biến x? a Writeln(‘Nhập x = ’); b Readn(x); c Writeln(x); d Readln(x); Câu 11 Giá trị x là bao nhiêu? trước đó giá trị x 5: if x div 2=1 then x:=x+1; a./ b./4 c./ d./ Câu 12 Có đoạn chương trình: x:=2; y:=5; for i:=1 to begin x:=x+1; y:=y+x; end; writeln(x,’ ‘,y); a./ b./ 17 c./ 18 d./ 17 II./ (1 điểm) Điền các cụm từ sau vào chỗ trống(…) để câu hoàn chỉnh: Khi khai báo biến lập trình cần khai báo ………….(1)… và ………… (2)…… Say khai báo biến, ta có thể sử dụng các biến chương trình với các thao tác ….(3)… và ……… (4)……… (6) III./ Hãy thay đổi trật tự các câu lệnh và sửa các lỗi sai để chương trình đúng Mỗi ý đúng 0.25 điểm Program Tinh_tong {cac so tư nhien } Var N, i: integer S: longint; Begin Write(‘Nhap N= ‘); Readln(N); Sửa lại S:=1; Writeln(‘Tich la’, S); For i:= to N S:=S*i; Readln End B TỰ LUẬN: (5 điểm) Câu 1./(1.5 điểm) Trình bày cú pháp và hoạt động và cách xác định số vòng lặp câu lệnh lặp ngôn ngữ lập trình Pascal? Câu 2./ (1.5 điểm) Biến là gì? Hằng là gì? Viết cú pháp khai báo biến, và lệnh gán Pascal? Câu 3./ (2 điểm) Viết chương trình tính tích các số chẳn N số tự nhiên đầu tiên với N là số tự nhiên nhập vào từ bàn phím A./ I Chọn đáp án đúng nhất: câu 0.25 đ Câu 10 11 12 Đ án II) Điền từ câu đúng 0.25 đ 1…… 2…… 3……… 4…… B./ TỰ LUẬN: (5 đ) (7) HƯỚNG DẪN CHẤM BÀI KIỂM TRA HK1 –MÔN TIN HỌC – ĐỀ II A TRẮC NGHIỆM: (5 điểm) I./ Mỗi ý đúng 0.25 điểm Câu Đ Án A D C D C C D B B 10 D 11 C 12 B II./ Mỗi ý đúng 0.25 điểm Tên biến Kiểu liệu biến Gán Tính toán III./ (1 điểm) Mỗi ý đúng 0.25 điểm Program Tinh_tong {cac so tư nhien } Program Tinh_tong {cac so tư nhien } Var N, i: integer Var N, i: integer; S: longint; S: longint; Begin Begin Write(‘Nhap N= ‘); Readln(N); Write(‘Nhap N= ‘); Readln(N); Sửa lại S:=1; S:=0; Writeln(‘Tich la’, S); For i:= to N S:=S+i; For i:= to N S:=S*i; Writeln(‘Tong la’, S); Readln Readln End End B TỰ LUẬN: (5 điểm) Câu 1./(1.5 điểm) Trình bày cú pháp và hoạt động và cách xác định số vòng lặp câu lệnh lặp biết trước ngôn ngữ lập trình Pascal? - Cú pháp: for <biến đếm>:= <giá trị đầu> to <giá trị cuối> <câu lệnh>; (0.5 điểm) Trong đó: for, to, là các từ khóa, biến đếm là biến kiểu nguyên, giá trị đầu và giá trị cuối là các giá trị nguyên và giá trị cuối không phải nhỏ giá trị đầu - Xác định số vòng lặp câu lệnh lặp: Giá trị cuối =giá trị đầu + (0.5 điểm) - Hoạt động: Sau vòng lặp biến đếm tự động tăng thêm đơn vị giá trị cuối (0.5 điểm) Câu 2./ (1.5 điểm) - Biến là đại lượng dùng để lưu trữ liệu Giá trị biến có thể thay đổi thực chương trình (0.25 điểm) - Khai báo biến: Var tên biến : kiểu dư liệu biến; (0.25 điểm) - Lệnh gán có dạng : Tên biến := biểu thức(gt); (0.5 điểm) - Hằng là đại lượng để lưu trữ diữ liệu và không thay đổi giá trị thực chương trình (0.25 điểm) - Khai báo hằng: Const tên hằng=giá trị; (0.25 điểm) Câu 3./ (2 điểm) Program Tinh_tich; Var N, i: integer; P: longint; Begin Write(‘Nhap so N= ’); Readln(N); P:= 1; For i:= to N If i mod =0 then P:=P*i; (8) Writeln(‘Tich cac so chan cua’, N,’ so tu nhien dau tien P= ‘,P); Readln; End (9) (10)