Sở GD & ĐT TP. HCM<br />
Trường THPT Trần Hưng Đạo<br />
Năm học: 2017 – 2018<br />
Họ và tên: ..........................................................<br />
<br />
ĐỀ THI HỌC KỲ II – KHỐI 11<br />
Môn: TIN HỌC<br />
Thời gian: 45 phút<br />
ĐỀ 01<br />
ĐIỂM<br />
<br />
Lớp:.............................. Mã số: ........................<br />
Câu 1: Cho chương trình sau: (2 điểm)<br />
Program Bai1;<br />
Uses crt;<br />
YÊU CẦU:<br />
Var x,y: Integer;<br />
- Kể tên các tham số hình thức, tham số thực<br />
Procedure Tinh(var a: integer,b: Integer);<br />
sự, biến toàn cục và biến cục bộ.<br />
Var t: Integer;<br />
........................................................................<br />
Begin<br />
........................................................................<br />
t:=a;<br />
........................................................................<br />
a:=b;<br />
........................................................................<br />
b:=t;<br />
........................................................................<br />
writeln( a+2, ' ' , b-a);<br />
........................................................................<br />
End;<br />
- Kết quả thực hiện được của chương trình<br />
Begin<br />
trên:<br />
Clrscr;<br />
........................................................................<br />
x:=5; y:=4;<br />
........................................................................<br />
Writeln(y ,' ', x+y);<br />
........................................................................<br />
Tinh(y,x);<br />
........................................................................<br />
Writeln(x,' ',y);<br />
........................................................................<br />
Readln;<br />
End.<br />
Câu 2: Em hãy tìm sửa lỗi và viết lại chương trình sau cho hoàn chỉnh: (2 điểm)<br />
Program Bai-2;<br />
Var x,y : byte;<br />
........................................................................<br />
........................................................................<br />
Procedure tinh (var a: byte,b)<br />
........................................................................<br />
Begin<br />
........................................................................<br />
a:= a /b;<br />
........................................................................<br />
b:=(a+b)*2;<br />
........................................................................<br />
begin<br />
........................................................................<br />
writeln(“nhap x,y”);<br />
........................................................................<br />
........................................................................<br />
readln(‘x,y’);<br />
........................................................................<br />
tinh(x ; y);<br />
........................................................................<br />
writeln(‘x=’,x:6 ‘y=’,y:6);<br />
........................................................................<br />
end.<br />
........................................................................<br />
........................................................................<br />
........................................................................<br />
<br />
Câu 3: Viết chương trình thực hiện việc nhập từ bàn phím hai số nguyên dương M và N (M