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

doc 2 trang Người đăng dothuong Lượt xem 632Lượt tải 0 Download
Bạn đang xem tài liệu "Đề kiểm tra chất lượng học kì I Tin học 8 (Có đáp án) - Năm học 2016-2017", để tải tài liệu gốc về máy bạn click vào nút DOWNLOAD ở trên
Đề 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 then ;
- Dạng đủ:
 If then 
 Else ;
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
 If (I mod 2 = 0) then s:=s+i;
 Writeln(‘Tong = ‘,s);
 End.
1đ
1đ
1đ
0.25đ
0.5đ
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đ

Tài liệu đính kèm:

  • docde_thi_hki_tin_8_20162017.doc