KIỂM TRA HỌC KỲ II.[r]
(1)Họ tên học sinh:
KIỂM TRA HỌC KỲ II NĂM HỌC 2011-2012
Lớp 8/ Môn:Tin Học Thời gian 45 phút
Điểm Lời phê giáo viên
I /Trắc nghiệm (2đ):
Điền Đ (đúng) S (sai) với câu sau:
for i:=10 to writeln('b');
2 var x: integer; begin for x := to 10 writeln('b'); end for i:=1 to 100 ;
for i:=1 to 100 writeln('b');
for i:=0.5 to 5.5 writeln('b');
for i=1 to 100 writeln('b');
while…do câu lệnh lặp với số lần lặp biết trước pascal
8.S:=0; n:=0;
while S <= 100
begin n:=n+1; S:=S+n end; II /Tự luận(8đ):
Câu (3điểm) Hãy xếp lại đọan chương trình sau cho var S, n : integer;
S:=0; n:=1; while S<=100 n:=n+1;
S:=S+n; end;
writeln('So n nho nhat de tong > 100 la ',n); readln
end Begin begin
writeln('Tong dau tien > 100 la ',S);
Câu (2 điểm): Viết thuật tốn tính tổng n số tự nhiên ( n = 1, 2, 3, ) cho tổng nhỏ lớn 30 in kết tổng, n
Câu (3 điểm) Viết chương trình in câu “ Tien hoc le – Hau hoc van “ 10 lần ?
(2)Đáp án
I /Trắc nghiệm (2đ):
Điền Đ (đúng) S (sai) với câu sau: S 1. for i:=10 to writeln('b');
Đ 2 var x: integer; begin for x := to 10 writeln('b'); end Đ for i:=1 to 100 ;
Đ for i:=1 to 100 writeln('b'); S 5. for i:=0.5 to 5.5 writeln('b'); S 6. for i=1 to 100 writeln('b');
S 7. while…do câu lệnh lặp với số lần lặp biết trước pascal S 8.S:=0; n:=0;
while S <= 100
begin n:=n+1; S:=S+n end; II /Tự luận(8đ):
Câu (3điểm) xếp lại var S, n : integer;
Begin
S:=0; n:=1; while S<=100 begin
n:=n+1; S:=S+n; end;
writeln('So n nho nhat de tong > 100 la ',n); writeln('Tong dau tien > 100 la ',S);
readln end
Câu (2 điểm): bước, bước 0.5đ
Câu (3 điểm) Viết chương trình in câu “ Tien hoc le – Hau hoc van “ 10 lần ? Program lap;
Var i : integer; Begin
For i :=1 to 10
Writeln ( ‘ lan thu ’,i,‘ Tien hoc le – Hau hoc van ‘); Readln