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: