Đề kiểm tra 45 phút thực hành môn Tin học lần 2 lớp 11 HK II năm học 2015-2016

Tham số hình thức B. Tham số thực sự C. Biến cục bộ 1.3) Tham số biến trong chương trình con trên là:A. Procedure Welcome Begin.[r]

SỞ GD VÀ ĐT LONG AN

TRƯỜNG THCS VÀ THPT MỸ BÌNH

ĐỀ KIỂM TRA THỰC HÀNH 45 PHÚT LẦN 2 HỌC KỲ II NĂM HỌC 2015 – 2016 MÔN: Tin học KHỐI: 11 CHƯƠNG TRÌNH: Cơ bản HỆ: THPT

Thời gian làm bài: 45 phút ( Không kể thời gian phát đề.)

Trường THCS & THPT Mỹ Bình

Lớp: 11A……

Họ và tên: ………

………

Năm học: 2015 - 2016

Điểm và nhận xét

ĐỀ 1.

Câu 1(3 đ):Cho chương trình sau:

Program Tham_so;

Var a, b: integer;

Procedure Nhan_biet_ts(x: integer; var y: integer);

begin

x:=x-1; y:=y-1;

writeln(x: 6; y: 6);

end;

Begin

a:=1; b:=4;

………?………

writeln(a: 6; b: 6);

End.

1 1) Câu lệnh điền vào (…? ) để gọi chương trình con Nhan_biet_ts cho 2 biến a và b là:

A Nhan_biet_ts;

B Nhan_biet_ts(a,b);

C Nhanbietts(a,b);

D Writeln(Nhan_biet_ts(a,b));

1 2) C¸c biÕn x, y lµ c¸c :

A Tham số hình thức B Tham số thực sự C Biến toàn cục D Biến cục bộ 1.3) Tham số biến trong chương trình con trên là:

Câu 2(1 đ): Trong các đoạn chương trình sau, đoạn nào là một thủ tục đúng để in ra dòng chữ

“Welcome to Pascal” ?

A Procedure Welcome to Pascal;

Begin

Writeln(’Welcome’);

End;

B Procedure Welcome;

Begin

Writeln(’Welcome to Pascal’);

End;

C Procedure Welcome

Begin

Writeln(“Welcome to Pascal”); End;

D Procedure Welcome;

Begin

Welcome to Pascal;

End;

Câu 3(1 đ): Muốn khai báo x, y là tham số giá trị và z là tham số biến (x, y, z thuộc kiểu Byte) trong

thủ tục “Max” thì khai báo nào sau đây là đúng?

A Procedure Max(x, Var y: Byte; var z: Byte); C Procedure Max(x, y: Byte; Var z: Byte);

B Procedure Max(x: Byte; Var y: Byte; var z: Byte); D function Max(x, y: Byte; var x: Byte);

Câu 4(5 đ): Hãy sửa lỗi chương trình hoàn chỉnh và sau đó chạy chương trình trên phần mềm free

pascal:

Program cau_3

Var a, b, h, s Real;

Fution DTHinhThang(x, y, z:real) : Real;

Begin

DTHinhThang (x + y) * z / 2;

End;

Begin

Wte( ‘nhap day lon, day nho va chieu cao cua hinh thang:’); Readln(a, b h);

s := DTHinhThang(a, b, h)

Writeln( ‘dien tich hinh thang la = ‘ s : 2 : 2);

Readln;

End

…Hết…