Trường: Kiểm tra HKII Lớp: Môn: Tin Học 8 Tên: Thời gian: 45 phút ------------------------------------------------------------------- Điểm Lời Phê Đề thi: Câu 1: Viết cú pháp và cách thực hiện của câu lệnh điều kiện dang thiếu. (2 điểm) Câu 2: Viết chương trình nhập x. Kiểm tra xem x la số chẵn hay số lẻ. (2 điểm) Câu 3: Viết chương trình nhập mảng n phần tử. In ra màn hình các phần tử có vị trí lẻ.(4 điểm) Câu 4: Viết chương trình tính tổng của n số .(2 điểm) Bài làm ___________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________________ GỢi Ý Câu 1: _ Cú pháp : If then ; (1 điểm) _Cách thực hiện : Khi gặp câu lệnh điều kiện dạng thiếu chương trình sẽ kiểm tra điều kiện. Nếu điều kiện thỏa mãn chương trình sẽ thực hiện câu lệnh. (1 điểm) Câu 2 : Program bai2; (0.25 điểm) Uses crt; (0.25 điểm) Var x: integer; (0.5 điểm) Begin Writeln(‘Nhap so nguyen x: ‘); readln(x); (0.5 điểm) If (x mod 2 = 0) then writeln(x,’ La so chan ‘) (0.25 điểm) Else writeln(x,’ La so le’); (0.25 điểm) Readln; End. Câu 3: Program Bai3; (0.25đ) Uses crt; (0.25đ) Var n,i :integer; (0.25đ) A:array [1..100] of integer; (0.25đ) Begin Writeln(‘Nhap so phan tu mang : ‘); readln(n); (0.5đ) For i:=1 to n do (0.5đ) Begin Writeln(‘Nhap phan tu a[‘,i,’] = ‘); (0.5đ) Readln(a[i]); (0.25đ) End; Writeln(‘Nhap phan tu o vi tri le la : ‘); (0.25đ) For i:=1 to n do (0.5đ) If i mod 2 0 then write(a[i],’ ‘); (0.5đ) Readln; End. Câu 4: Program Bai4; (0.25đ) Uses crt; (0.25đ) Var n,i :integer; (0.25đ) S:longint; (0.25đ) Begin Writeln(‘Nhap so n : ‘); readln(n); (0.25đ) S:=0; (0.25đ) For i:=1 to n do S:=S+i; (0.25đ) Writeln(‘Tong cua’, n ,’so la = ‘, S:10:3); (0.25đ) Readln; End.
Tài liệu đính kèm: