de thi tin 8

Câu 2: Hãy viết các biểu thức toán dưới đây bằng các kí hiệu trong PascalA. Trắc Nghiệm: đánh dấu X vào đáp án đúng..[r]

Trường THCS Xuân Bảo KIỂM TRA HỌC KỲ I



I Trắc nghiệm: đánh dấu X vào đáp án đúng (3 điểm) 1 Cấu trúc điều kiện dạng đầy đủ có dạng: A if <điều kiện > then <câu lệnh 1>; else <câu lệnh 2>;

B if <điều kiện > then <câu lệnh 1> else <câu lệnh 2>;

C if <điều kiện> then <câu lệnh >;

D if <câu lệnh 1> then <câu lệnh 2>; 2 Trong các tên sau đây, tên nào là hợp lệ trong ngôn ngữ Pascal: A Tam giac; B end; C Tamgiac; D 3so 3 Để thực hiện việc tính tổng của hai số nguyên a và b, phép gán nào sau đây là đúng: A Tong=a+b; B Tong:=a+b; C Tong:a+b; D.Tong(a+b); 4 Cú pháp của lệnh gán trong Pascal là? A Const <tên hằng> = <giá trị>; B Uses < tên>; C Var <danh sách biến>:<kiểu dữ liệu>; D <biến>:= <biểu thức>; 5 Từ khoá Var trong Pascal dùng để làm gì? A Khai báo biến B Khai báo mảng C Khai báo tên chương trình D Khai báo hằng 6 Hãy cho biết giá trị của biến X bằng bao nhiêu sau khi thực hiện câu lệnh if (45 mod 3 ) = 0 then X :=X+2; ( Biết rằng trước đó giá trị của biến X = 5) A.5 B 9 C 7 D 11 II- TỰ LUẬN: 7 điểm Câu 1: Hãy chỉ ra lỗi của chương trình sau (2đ): Program sua loi {1}

Var a,b,c:Integer; {2}

Begin {3}

a:=300; {4}

b:=a+100 {5}

c:=a/b; {6}

a:=a+b; {7}

writeln('Ket qua a=',a, ‘b=',b, ‘c=',c:4:2); {8}

readln {9}

End {10}

ĐIỂM LỜI PHÊ CỦA THẦY,CÔ GIÁO

THÍ SINH KHÔNG ĐƯỢC VIẾT VÀO ĐÂY.

VÌ ĐÂY LÀ PHÁCH SẼ RỌC MấT



Câu 2 : Hãy viết các biểu thức toán dưới đây bằng các kí hiệu trong Pascal (2đ) a) ax2+bx+c b) a −b c − d+a2 Câu 3 : Cho hai số thực a và b Hãy viết chương trình cho biết kết quả so sánh hai số đó dưới dạng “ a lớn hơn b”, “a nhỏ hơn b” hoặc “ a bằng b”? (3đ)

ĐÁP ÁN

I Trắc Nghiệm: đánh dấu X vào đáp án đúng (3 điểm) mỗi câu 0.5đ

Câu 1:B Câu 2:C Câu 3:B Câu 4:D Câu 5:A Câu 6:C

II- TỰ LUẬN: 6 điểm

Câu 1: Hãy chỉ ra lỗi của chương trình sau và cho kết quả xuất ra trên màn hình (2đ):

Sửa lỗi (2đ)

{1} Tên sua loi không được có khoảng trống, thiếu ;

{2} khai báo biến c phải là kiểu số thực Real

{5} Thiếu ;

{10} Thiếu dấu

Câu 2: (2đ)

a) ax2+bx+c => a*x*x+ b*x + c

b) a −b c − d+a2 => (a-b)/ (c-d) + a*a

Câu 3: Viết chương trình: (3đ)

Program sosanhhaiso;

Uses crt;

Var a,b: integer;

Begin

Write(‘Moi ban nhap vao 2 so nguyen:’);

Readln(a,b);

If a>b then Write(‘a lon hon b’);

If a<b then Write(‘a be hon b’);

If a=b then Write(‘a bang b’);

End