Họ và tên:
KIỂM TRA 1 TIẾT
Môn: TIN HỌC 8
Điểm

Lớp: 8/….



I. TRẮC NGHIỆM: Hãy chọn đáp án đúng và điền vào bảng “Đáp án” ở phần bài làm. (3đ)
Câu 1: Để khai báo biến x thuộc kiểu số nguyên ta khai báo:
A. Var x: String; B. Var x: Integer; C. Var x: Char; D. Var x: Real;
Câu 2: Ta có 2 lệnh sau x:= 5; if x > 10 then x:= x+1; giá trị của x là bao nhiêu:
A. 6 B. 10 C. 5 D. 11
Câu 3: Kết quả của phép toán: “10 mod 3” là:
A. 8 B. 1 C. 12 D. 2
Câu 4: Khi soạn thảo xong một chương trình Pascal, để chạy chương trình thì ta nhấn phím:
A. Ctrl + F4 B. Alt + F4 C. Ctrl + F9 D. Alt + F9
Câu 5:Var s,i:integer;
Begin
s:=0;
for i:=1 to 5 do s := s+i;
Writeln(‘s= ‘,s);
End.
Sau khi thực hiện đoạn chương trình trên, giá trị của biến S bằng:
A. 11 B. 55 C. 101 D. 15
Câu 6: Var i,p: integer;
Begin
i:=1;
While i<5 do begin p:=p+i; i:=i+1; end;
Writeln(‘p= ‘,p);
End.
Cho biết vòng lặp While…do trên thực hiện bao nhiêu lần lặp?
A. 4 B.3 C.6 D.5
II. TỰ LUẬN: (7đ)
Câu 1: Viết câu lệnh lặp với số lần biết trước? Số vòng lặp được tính như thế nào? (2đ)
Câu 2: Kẻ bảng thể hiện các bước thực hiện cho vòng lặp For…do trong đoạn lệnh sau? (2đ)
Begin
P:= 1; K:=0;
For i:= 1 to 5 do begin P:=P*i; K:=K+1; end;
End.
Câu 3: Viết chương trình tính tổng các số tự nhiên từ 1 đến n (n là số nguyên nhập vào từ bàn phím). Dùng vòng lặp while... do (3đ)
BÀI LÀM
I. TRẮC NGHIỆM:

CÂU HỎI
1
2
3
4
5
6

ĐÁP ÁN








II. TỰ LUẬN:
....................................................................................................................................................................................