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; BeginClrscr;
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.