Đề kiểm tra chất lượng học kì I Tin học 8 (Có đáp án) - Năm học 2016-2017

KIỂM TRA CHẤT LƯỢNG HKI

Môn: Tin học 8 Năm học: 2016-2017

Lý thuyết + Thực hành Đề: Câu 1: (1 điểm) Hãy viết cấu trúc của câu lệnh điều kiện. Câu 2: (1 điểm) Ngôn ngữ lập trình là gì? Câu 3: (4 điểm) Sửa lỗi sai của chương trình sau (Biết chương trình này dùng để tính tổng các số chẵn từ 1 đến n) Program begin_end; Var n:string; i,s: integer; Begin Clrscr; Writeln(‘Nhap so n: ‘); readln(n); For i=1 to n do If (n mod 2 <> 0) then s:=s+i Writeln(‘Tong = ‘,s); End. Câu 4: (2 điểm) Viết chương trình nhập độ dài 3 cạnh của tam giác (kiểu số nguyên). Kiểm tra xem 3 độ dài đó có phải bộ số Py-ta-go không? Câu 5: (2 điểm) Viết chương trình tính tích của các số chẵn trong khoảng từ 1 đến 20.

--- Hết ---

HƯỚNG DẪN CHẤM BÀI Câu 1 Cấu trúc: - Dạng thiếu: if <điều kiện> then <câu lệnh>; - Dạng đủ: If <điều kiện> then <câu lệnh 1> Else <câu lệnh 2>;

0.5 đ

0.5đ

Câu 2 Ngôn ngữ lập trình là tập hợp các kí hiệu và quy tắc viết các lệnh 1đ Câu 3 Program baitap; Uses crt; Var n:integer; i,s: integer; Begin Clrscr; Writeln(‘Nhap so n: ‘); readln(n); S:=0; For i:=1 to n do

1đ 1đ 1đ

0.25đ

0.5đ

ThuVienDeThi.com

If (I mod 2 = 0) then s:=s+i; Writeln(‘Tong = ‘,s); End.

0.25đ

Câu 4 Program bai4; Uses crt; Var a,b,c:integer; Begin Clrscr; Write(‘Nhap a,b,c: ‘); readln(a,b,c); If (a+b>c) and (a+c>b) and (b+c>a) then writeln(a,’ , ‘,b,’ , ‘,c,’ La bo so Py-ta-go’) Else writeln(a,’ , ’,b,’ , ‘,c,’ Khong la bo so Py-ta-go’); Readln; End.

0.25đ

0.75đ

0.5đ

0.5đ

Câu 5 Uses crt; Var I,t:integer; Begin Clrscr; T:=1; For i:=1 to 20 do If (i mod 2 = 0) then t:=t*i; Writeln(‘Tich = ‘,t); Readln; End.

0.25đ

0.25đ

0.5đ 0.5đ 0.5đ

ThuVienDeThi.com