Program, end, begin, Readln, lop8a C.. Program, then, mot, hai,ba D.[r]
(1)TRƯỜNG THCS TAM THANH HỌ VÀ TÊN:……… … LỚP:………
KIỂM TRA TIẾT MÔN: TIN HỌC TUẦN: – TIẾT: 18
Điểm: Lời phê:
……… ……… ĐỀ:
A PHẦN TRẮC NGHIỆM: (6 điểm)
Hãy khoanh tròn vào chữ trước câu trả lời câu hỏi sau: Câu 1: Kết quả của phép toán 17 mod là:
A B C D 8.5
Câu 2: Để dịch chương trình Pascal ta sử dụng tổ hợp phím nào?
A Alt +F5 B Ctrl+F9 C Alt + X D Alt +F9 Câu 3: Các phép toán nào sau không dùng cho kiểu số thực?
A +, -,*,/ B <,>,>=,<=, <>,=
C Mod và div D +, -,*,/ và <,>,>=,<=, <>,= Câu 4: Biểu thức toán học - viết bằng ngơn ngữ lập trình Pascal là:
A x+5/a+3-y/b+5 B (x+5)/(a+3)-y/(b+5)
C x+5\a+3-y\b+5 D (x+5)\(a+3)-y\b+5
Câu 5: Dữ liệu nào sau xem là dữ liệu dạng xâu kí tự?
A ’1234’ B 1234 C 123.4 D 123+E
Câu 6: Giả sử A khai báo là biến kiểu số thực Phép gán đúng là:
A A = 4.1; B A = x; C X:= 2; D A:= “abc”;
Câu 7: Từ khóa nào sau dùng để khai báo thư viện?
A Uses B const C Var D Program
Câu 8: Trong Pascal, khai báo nào sau là đúng?
A Var tb = Real; B Var 4hs : integer; C Const X = 30; D Var R = integer; Câu 9: Đâu là các từ khoá?
A Lop82, uses, begin, end B Program, end, begin, Readln, lop8a C Program, then, mot, hai,ba D Program, end, begin
Câu 10: Kết quả in màn hình của câu lệnh Writeln(‘5+20 = ‘, ‘20+5’); là:
A 5+20=25 B 5+20=20+5 C 20+5=25 D 25 = 25
Câu 11: Trong các tên sau đây, tên nào là hợp lệ ngôn ngữ Pascal?
A var B TAMGIAC C end D 8x
Câu 12: Câu lệnh dùng để tạm ngừng chương trình là:
A Writeln(); B Clrscr; C Readln ; D program; B TỰ LUẬN: (4 điểm)
Bài (1 điểm): Viết các biểu thức toán học sau thành biểu thức Pascal a/ (a+b)2 + a:2
b/ x y
x
(2)Bài (2 điểm): Tìm và sửa các lỗi sai chương trình Pascal sau:
(Chương trình nhập vào số nguyên x,y sau đó hoán đổi vị trí của x,y và in kết quả màn hình)
Program Hoan_Doi; ………
Const crt; ………
Var x, y = Integer; ………
Begin ………
Clrscr; ………
Write(‘Nhap x, y =’); ………
Readln; ………
x = y; ………
y = x; ………
Writeln( x , y); ………
Readln; ………
(3)ĐÁP ÁN A PHẦN TRẮC NGHIỆM: (6 điểm)
Mỗi câu đúng 0,5 điểm
1 10 11 12
B D C B A C A C D B B C
B TỰ LUẬN: (4 điểm) Bài (1 điểm):
Mỗi câu 0,5 điểm a. (a+b)*(a+b)+a/2 b. (x-y)/(2*x+1) Bài (1 điểm):
Mỗi ý 0,5 điểm - Khác nhau:
+ Biến: Có giá trị có thể thay đổi quá trình thực chương trình + Hằng: Có giá trị khơng đổi quá trình thực chương trình
- Cú pháp lệnh gán giá trị cho biến Pascal: <Tên biến> := <Biểu thức cần gán giá trị cho biến>; Bài (2 điểm):
Đê Chương trình đúng Điểm
Program Hoan_Doi;
Const crt;
Var x, y : Integer; Begin
Clrscr;
Write(Nhap x, y =); Readln;
x = y; y = x; Writeln(‘ x , y’); Readln
End.
Program Hoan_Doi;
Uses crt;
Var x, y, z : Integer; Begin
Clrscr;
Write(‘Nhap x, y =‘); Readln(x,y);
z := x; x := y; y := z;
Writeln( x , y); Readln
End.