Đề thi học kỳ i môn tin học 8

ĐỀ THI HỌC KỲ I
MÔN: TIN HỌC 8
Thời gian: 45 phút
(Không kể thời gian chép đề)

ĐỀ 1
Câu 1: (3 điểm)
Chỉ ra các từ khoá, các biến của chương trình tính diện tích hình tròn.
Program S_Hinh_Tron;
Var R: Integer;
S: Real;
Const PI = 3.14;
Begin
Write('Nhap ban kinh hinh tron R=: '); Readln(R);
S:= So_PI*R*R;
Write('Dien tich hinh tron la: ', S); readln
end.
Câu 2 (2điểm): Hãy chuyển các biểu thức được viết trong Pascal sang biểu thức toán học (2điểm)
a, (a + b)*(a – b)* x/y;
b, b/(a*b + c*c);
c, a*a/((3*b – c)*3*b);
d, 1 + 1/2 + 1/(2*3) + 1/(3*4) + 1/(4*5)
Câu 3: Hãy liệt kê các lỗi nếu có trong chương trình sau và sửa lại cho đúng (Nếu không sửa phải
giải thích) (5điểm)
Nội dung chương trình
Kết quả
Sửa lại
Var b, a: Integer;
Const c:= 4;
Begim
a:=200;

b:=5/a;
Write(Toi la hoc sinh gioi);
readln
end


ĐỀ THI HỌC KỲ I
MÔN: TIN HỌC 8
Thời gian: 45 phút
(Không kể thời gian chép đề)

ĐỀ 2
Bài 1: (3 điểm)
Chỉ ra các từ khoá, các biến của chương trình tính diện tích hình tròn.
Program S_Hinh_Tron;
Var R: Integer;
S: Real;
Const PI = 3.14;
Begin
Write('Nhap ban kinh hinh tron R=: '); Readln(R);
S:= So_PI*R*R;
Write('Dien tich hinh tron la: ', S); readln
end.
Bài 2: (5 điểm)
Em hãy viết chương trình:
a/ Tìm giá trị lớn nhất trong hai số a, b được nhập từ bàn phím.
b/ Hãy xác định điều kiện bài toán.
Bài 3: (2 điểm)
Hãy liệt kê các lỗi nếu có trong chương trình dưới đây và sửa lại cho đúng.
Var a, b:= integer;

Const c:=3;
Begin
a:= 200;
b:=a/c;
Write(b);
Readln
End.
-----------------------HẾT--------------------IV. ĐÁP ÁN
ĐỀ 1
CÂU
Bài 1:

NỘI DUNG
Mỗi từ khoá và biến chỉ ra đúng được 0,5 điểm.
Program ; Var ; Const ; Begin ; end.
Các biến: R, S.

ĐIỂM
3 điểm


Bài 2:

A)  a  b  .  a  b  .

2 điểm

x
y

b
ab  c 2
a2
C)
 3b  c  3b
1 1
1
1


D) 1  
2 2.3 3.4 4.5
Nội dung chương trình
Var b, a: Integer;
Const c:= 4;
Begim
a:=200;
b:=5/a;
Write(Toi la hoc sinh
gioi);
readln
end
B)

Bài 3:

ĐỀ 2
CÂU
Bài 1:

Bài 2:

Kết quả
Đúng
Sai
Sai
Đúng
Sai
Sai
Đúng
Sai

Sửa lại

5 điểm

Const c= 4;
Begin
B là số thực
Write(‘Toi la hoc sinh gioi’);
End.

NỘI DUNG
Mỗi từ khoá và biến chỉ ra đúng được 0,5 điểm.
Program ; Var ; Const ; Begin ; end.
Các biến: R, S.

ĐIỂM
3 điểm

a/ Viết chương trình.
Program GTLN;
Uses
crt;
Var
a, b, Max : Integer;
Begin
Clrscr;
Write (‘a=’) ; Readln(a);
Write (‘b=’) ; Readln(b);
Max: =a;
If a < b then
Max : = b;
Writeln (‘ gia tri lon nhat cua hai so a, b la :’,
Max) ;

5 điểm


Readln;
End.
b/
 Xác định bài toán.
- Input: hai số a, b,nhập từ bàn phím.
Output: giá trị MAX trong hais số a, b,nhập từ
bàn phím.
Bài 3:

Do đó, chương trình đã chỉnh sửa sẽ là 2 điểm
như sau:

(0.5đ)
Var a: integer;
b: real;
Const c= 3;
Begin
a:= 200;
b:= a/c;
Write(b);
Readln
End.