TRẮC NGHIỆM: 3Đ Thí sinh chọn và ghi câu trả lời đúng nhất vào ô: Câu hỏi Đáp án.. Câu 1: Câu lệnh Pascal nào sau đây là hợp lệ?[r]
Trang 1TRƯỜNG THCS ………
Tên HS: ……… Lớp: 8….
ĐỀ KIỂM TRA HỌC KỲ II – NĂM HỌC 20… – 20…
Môn: Tin Học 8 – Thời gian: 45 phút – Ngày thi: / / 20…
Giám khảo ký, ghi rõ họ tên
Tên, chữ kí giám thị GT1: GT2:
ĐỀ 1:
I TRẮC NGHIỆM: (3Đ)
Thí sinh chọn và ghi câu trả lời đúng nhất vào ô:
Đáp án
Câu 1: Câu lệnh Pascal nào sau đây là hợp lệ?
a For i:=100 to 1 do write(‘Tin hoc’); b For i:=1.5 to 10.5 do s:=s+1;
c For i:1 to 10 do writeln(‘HKII’); d For i:=1 to 15 do writeln(‘Lop 8’);
Câu 2: Sau khi thực hiện đoạn chương trình sau, giá trị của biến X bằng bao nhiêu? X:=0; For i:=1 to 10 do If ( i mod 2 = 0) then X:=X + I;
Câu 3: Câu lệnh pascal nào sau đây là không hợp lệ?
a While x>5 do x = x + 1; b While x<5 do x:=x+2;
c While x>0 do x:= x – 2; d While x=10 do x:=x+3;
Câu 4: Các khai báo biến mảng trong Pascal, khai báo nào sau đây là hợp lệ?
a Var X: array[1,50] of integer; b Var A: array[1…50] of real;
c Var A: array[1.5 50] of integer; d Var X: array[1 50] of real;
Câu 5: Câu lệnh Pascal nào sau đây là không hợp lệ?
a For i:=1 to 15 do x: = x+2; b While ( n mod I <>0 ) do i:=i+1;
c A: array[1 10] of real; d For i:=1 to 10 do begin tong:= tong+i;
Câu 6: Vòng lặp While do là vòng lặp:
a Biết trước số lần lặp b Chưa biết số lần lặp
c Biết trước số lần lặp nhưng nhỏ hơn 50 lần d.Có số lần lặp không quá 1000 lần
II THỰC HÀNH: (7Đ)
Câu 1: ( 3đ) Viết chương trình nhập vào số nguyên n Tính và in ra màn hình N! Câu 2: (4 đ) Viết chương trình nhập một mảng n số nguyên In ra màn hình phần tử
lớn nhất và nhỏ nhất trong mảng
Trang 2TRƯỜNG THCS ………
Tên HS: .Lớp: 8
ĐỀ KIỂM TRA HỌC KỲ II – NĂM HỌC 20… – 20…
Môn: Tin Học 8 – Thời gian: 45 phút – Ngày thi: / / 2017
Giám khảo ký, ghi rõ họ tên
Tên, chữ kí giám thị GT1: GT2:
ĐỀ 2:
I TRẮC NGHIỆM: (3Đ)
Thí sinh chọn và ghi câu trả lời đúng nhất vào ô:
Đáp án
Câu 3: Câu lệnh pascal nào sau đây là không hợp lệ?
a While x>5 do x = x + 1; b While x<5 do x:=x+2;
c While x>0 do x:= x – 2; d While x=10 do x:=x+3;
Câu 1: Câu lệnh Pascal nào sau đây là hợp lệ?
a For i:=100 to 1 do write(‘Tin hoc’); b For i:=1.5 to 10.5 do s:=s+1;
c For i:1 to 10 do writeln(‘HKII’); d For i:=1 to 15 do writeln(‘Lop 8’);
Câu 2: Sau khi thực hiện đoạn chương trình sau, giá trị của biến X bằng bao nhiêu? X:=0; For i:=1 to 10 do If ( i mod 2 = 0) then X:=X + I;
Câu 6: Vòng lặp While do là vòng lặp:
a Biết trước số lần lặp b Chưa biết số lần lặp
c Biết trước số lần lặp nhưng nhỏ hơn 50 lần d.Có số lần lặp không quá 1000 lần
Câu 4: Các khai báo biến mảng trong Pascal, khai báo nào sau đây là hợp lệ?
a Var X: array[1,50] of integer; b Var A: array[1…50] of real;
c Var A: array[1.5 50] of integer; d Var X: array[1 50] of real;
Câu 5: Câu lệnh Pascal nào sau đây là không hợp lệ?
a For i:=1 to 15 do x: = x+2; b While ( n mod I <>0 ) do i:=i+1;
c A: array[1 10] of real; d For i:=1 to 10 do begin tong:= tong+i;
II THỰC HÀNH: (7Đ)
Câu 1: ( 3đ) Viết chương trình nhập vào số nguyên n Tính và in ra màn hình N! Câu 2: (4 đ) Viết chương trình nhập một mảng n số nguyên In ra màn hình phần tử
lớn nhất và nhỏ nhất trong mảng
Trang 3ĐÁP ÁN, BIỂU ĐIỂM
ĐỀ KIỂM TRA HKII NĂM HỌC 20… – 20…
MÔN: TIN HỌC 8
I TRẮC NGHIỆM: (3Đ)
Thí sinh chọn và ghi câu trả lời đúng nhất vào ô: mỗi câu đúng 0.5đ
II THỰC HÀNH: (7Đ)
Câu 1:
Program cau1;
Var i,n, p:integer;
Begin
Writeln(‘Nhap n:’);
Readln(n);
p:=1;
For i:=1 to n do P:=p*i;
Writeln(n, ‘! = ’, p);
Readln;
End
Câu 2:
Program Cau2;
Var a:array[1 100] of integer;
I,n,max,min: integer;
Begin
Writeln(‘Nhap n:’);
Readln(n);
For i:=1 to n do
Begin
Writeln(‘Nhap a[‘,I,’]:’);
Readln(a[i]);
End;
Trang 4Min:= a[1];
For i:=2 to n do
If a[i] > max then max:=a[i];
If a[i] < min then min:=a[i]; Writeln(‘So lon nhat trong day la:’, max); Writeln(‘So be nhat trong day la:’, min); Readln;
End