Câu 7: Trong số các hoạt động sau đây, hoạt động nào sẽ được thực hiện lặp lại với số lần chưa biết trước.. Tính tổng của 20 số tự nhiên đầu tiên?[r]
(1)PHÒNG GD&ĐT TP HỘI AN
TRƯỜNG THCS HUỲNH THỊ LỰU KIỂM TRA HỌC KỲ IINăm học:2019-2020 Môn: Tin học 8 Thời gian: 45 phút
Họ tên : …… Lớp: Ngày kiểm tra
Điểm Lời nhận xét thầy ( cô) giáo
A LÝ THUYẾT(5điểm)
* Khoanh tròn vào câu trả lời mà em cho nhất: Câu 1: Câu lệnh pascal sau hợp lệ?
A For i:=100 to writeln(‘A’); B For i:=1.5 to 10.5 writeln(‘A’); C For i= to 10 writeln(‘A’); D For i:= to 10 writeln(‘A’); Câu 2: Sau thực đoạn chương trình sau:
S:=0; For i:=1 to S:=S+i; Giá trị biến S bao nhiêu?
A 20. B 15. C 10. D 0.
Câu 3: Cú pháp câu lệnh While…do?
A While <điều kiện> to <câu lệnh>; B While <câu lệnh> <điều kiện> ; C While <điều kiện> <câu lệnh>; D While <điều kiện>; <câu lệnh>; Câu 4: Vòng lặp While <Điều kiện> <Câu lệnh>; vòng lặp:
A Chưa biết trước số lần lặp. B Biết trước số lần lặp
C Biết trước số lần lặp giới hạn <=100. D Biết trước số lần lặp giới hạn >=100
Câu 5: Đoạn lệnh sau so:=1;
While so<10 writeln(so); so:=so+1;
sẽ cho kết nào?
A In số từ đến 9. B In số từ đến 10.
C In vô hạn số 1, số dòng. D In số 10.
Câu 6: Sau đoạn chương trình câu thực hiện, giá trị biến “so” bao nhiêu?
A 1. B 2. C 0. D Không xác định được.
Câu 7: Trong số hoạt động sau đây, hoạt động thực lặp lại với số lần chưa biết trước?
A Tính tổng 20 số tự nhiên đầu tiên. B Nhập 50 số nguyên từ bàn phím
C Học đến thuộc. D Nam học ngày buổi.
Câu 8: Trong câu lệnh sau, câu lệnh đúng?
A while i:=1 t:=10; B while a<b; write(‘a nho hon b’); C while i=1 t=10; D while a<b write(‘a nho hon b’); Câu 9: Cú pháp khai báo biến mảng Pascal là:
(2)D var <Tên mảng> : array [<chỉ số đầu>…<chỉ số cuối>] for <kiểu liệu >; Câu 10: Chọn khai báo hợp lệ:
A Var a,b: array[1 n] of real; B Var a,b: array[1 : n] of Integer; C Var a,b: array[1 100] of real; D Var a,b: array[1 … 100] of real;
Câu 11: Biến a nhận giá trị ; -1 ; ; 2,3 Ta khai báo biến a thuộc kiểu liệu nào?
A Integer. B Real. C Char. D Longint.
Câu 12: Mảng A: array[5 203] of integer; có phần tử?
A 5. B 203. C 198. D 199.
Cho biết khẳng định sau hay sai cách đánh dấu (X) vào ô Đúng hay Sai tương ứng:
Khẳng định Đúng Sai
Câu 13 Trong câu lệnh For…do số đầu nhỏ số cuối chương trình báo lỗi. Câu 14 Câu lệnh sau lệnh lặp while…do khơng
được thực lần từ đầu, điều kiện vịng lặp có giá trị sai
Câu 15 Trong pascal khai báo biến kiểu mảng số đầu số cuối số thực
Câu 16 Có thể đọc giá trị, gán giá trị, thực tính tốn với phần tử mảng
Hãy sửa lại câu lệnh sau cho đúng:
Câu lệnh Sửa lại
Câu 17: For i: =1,5 to 105 x:=x+1; Câu 18: Wheli a=b write(‘a bang b’); Câu 19: Y: array[1,100] of real;
Câu 20: A: array(2 99) of real; B.THỰC HÀNH(5điểm)
Bài 1: Viết chương trình nhập vào từ bàn phím điểm kiểm tra mơn Tốn n học sinh lớp với n 50 .
a/ Gõ chương trình sau đây: (1 điểm) Uses crt;
Var n, i : integer; a:array[1,50] of real; BEGIN
Write(‘nhap so hoc sinh lop: ’); readln(n); While (n<1) or (n>50) do;
Begin
Write(‘nhap lai’); readln(n); For i:=1 downto n
Begin
Write( ‘a[‘,i,’]=’); readln(A[i]); End
readln END
b/ Sửa lỗi sai có chương trình.(3 điểm)
(3)ĐÁP ÁN VÀ BIỂU ĐIỂM A.LÝ THUYẾT: (5 điểm)
Mỗi câu trả lời 0.25 điểm
Câu
0 1
Đáp án D B C A C D C D A C B D S Đ S Đ
Câu 17: For i: =15 to 105 x:=x+1; 0.25 điểm Câu 18: While a=b write(‘a bang b’); 0.25 điểm Câu 19: Y: array[1 100] of real; 0.25 điểm Câu 20: A: array[2 99] of real; 0.25 điểm B.THỰC HÀNH: (5điểm)
Bài 1:
a/Nhập đầy đủ liệu 1.0 điểm
b/
Uses crt;
Var n, i : integer; a:array[1 50] of real; {sửa dấu , thành } BEGIN
Write(‘nhap so hoc sinh lop: ’); readln(n);
While (n<1) or (n>50) {bỏ dấu ; } Begin
Write(‘nhap lai’); readln(n);
End; {thêm end } For i:=1 to n {sửa downto thành to }
Begin
Write( ‘a[‘,i,’]=’); readln(a[i]); {sửa A thành a} End; {sửa dấu thành ;} readln END 0.5 điểm 0.5 điểm 0.5 điểm 0.5 điểm 0.5 điểm 0.5 điểm Bài 2: Uses crt;
Var i,n : integer;
A: array[1 200] of integer;
0.25 điểm 0.25 điểm BEGIN
Clrscr;
Write(‘so cac so nguyen can nhap la: ’); readln(n); 0.25 điểm For i:=1 to n
Begin
Write( ‘a[‘,i,’]=’); readln(A[i]); End
readln END
(4)BẢNG MÔ TẢ A.LÝ THUYẾT
Câu 1: Biết cú pháp lệnh lặp For
Câu 2: Hiểu cách hoạt động lệnh lặp For do. Câu 3: Nắm cú pháp lệnh lặp While do.
Câu : Hiểu cách sử dụng lệnh lặp while Câu 5: Hiểu cách hoạt động lệnh lặp While do. Câu : Hiểu cách hoạt động lệnh lặp While do.
Câu 7: Nhận biết hoạt động lặp với số lần trước. Câu 8: Nắm cú pháp lệnh lặp While do.
Câu 9: Nhận biết cú pháp khai báo biến mảng. Câu 10: Khai báo biến mảng.
Câu 11: Nhận biết kiểu liệu khai báo biến mảng. Câu 12: Tính số phần tử mảng.
Câu 13: Hiểu cách hoạt động lệnh lặp For.do. Câu 14: Hiểu cách hoạt động lệnh lặp While do. Câu 15: Hiểu cách khai báo biến kiểu mảng. Câu 16: Hiểu cách sử dụng phần tử mảng. Câu 17: Nắm cú pháp lệnh lặp For do.
Câu 18: Nắm cú pháp lệnh lặp while do. Câu 19: Khai báo biến kiểu mảng.
Câu 20: Khai báo biến kiểu mảng. B.THỰC HÀNH
Bài 1:
a/ Gõ chương trình Pascal máy b/ Thực thao tác dịch sửa chương trình Bài 2:
(5)KIỂM TRA HỌC KỲ II MÔN TIN HỌC 8 B.THỰC HÀNH(5điểm)
Bài 1: Viết chương trình nhập vào từ bàn phím điểm kiểm tra mơn Tốn n học sinh lớp với n 50 .
a/ Gõ chương trình sau đây: (1 điểm) Uses crt;
Var n, i : integer; a:array[1,50] of real; BEGIN
Write(‘nhap so hoc sinh lop: ’); readln(n); While (n<1) or (n>50) do;
Begin
Write(‘nhap lai’); readln(n); For i:=1 downto n
Begin
Write( ‘a[‘,i,’]=’); readln(A[i]); End
readln END
b/ Sửa lỗi sai có chương trình.(3 điểm)
Bài 2: Viết chương trình nhập n số nguyên từ bàn phím (1 điểm)
KIỂM TRA HỌC KỲ II MÔN TIN HỌC 8 B.THỰC HÀNH(5điểm)
Bài 1: Viết chương trình nhập vào từ bàn phím điểm kiểm tra mơn Tốn n học sinh lớp với n 50 .
a/ Gõ chương trình sau đây: (1 điểm) Uses crt;
Var n, i : integer; a:array[1,50] of real; BEGIN
Write(‘nhap so hoc sinh lop: ’); readln(n); While (n<1) or (n>50) do;
Begin
Write(‘nhap lai’); readln(n); For i:=1 downto n
Begin
Write( ‘a[‘,i,’]=’); readln(A[i]); End
readln END
b/ Sửa lỗi sai có chương trình.(3 điểm)
(6)