đề thi kì 2 tin 8

Trường THCS Thành Cổ
ĐỀ KIỂM TRA HỌC KÌ II
MÔN TIN HỌC
Thời gian làm bài 45 phút
Họ và tên: lớp 8
I. lí thuyết:
Câu 1: (1.5 điểm) Nêu cú pháp câu lệnh while do, nêu quá trình hoạt động
Câu 2: (1 điểm) Nêu cú pháp cách khai báo biến mảng. Cho ví dụ.
Câu 3: (1 điểm) Nêu cú pháp câu lệnh điều kiện dạng đủ. Cho ví dụ
II. Bài tập:
Câu 1: (1.5 điểm) khoanh tròn chổ sai và sửa lại cho đúng:
a) a : = 5; while a < 10 then a : = a +1;
b) For i = 1 to 10 do Writeln(‘TIN HOC 8’);
c) If x > 5 then x: = x +1; else x : = x- 1;
Câu 2: (1 điểm) Cho đoạn chương trình sau:
S : = 0; i: = 0;
While i < = 10 do
Begin
S:= S + i;
i : = i + 1;
End;
Sau khi thực hiện chương trình giá trị của i và S bằng bao nhiêu?
Câu 3: (2 điểm) Sắp xếp các dòng sau thành một chương trình tính tổng 100 số tự
nhiên đầu tiên khác 0 hoàn chỉnh
var i: integer; S: longint;
writeln('Tong cua 100 so tu nhien dau tien khac 0 S = ', S);
program Tinh_tong;
I := 1;
begin
while i <=100 do
S:= S+i;

begin
I:= i+1;
S:= 0;
readln;
end.
end;
Câu 3: (2 điểm) Viết chương trình giải phương trình bậc nhất dạng a*x + b = 0, với
a, b được nhập vào từ bàn phím, có kiểm tra hệ số a, nếu a =0 thì yêu cầu nhập lại cho
đến khi a khác 0 thì in ra màn hình nghiệm của phương trình.





Điểm