Đề kiểm tra học kỳ 2 môn Tin học năm học 2019 - 2020

UBND HUYỆN CỦ CHI MA TRẬN ĐỀ KIỂM TRA HỌC KỲ II.. TRƯỜNG THCS PHÚ HÒA ĐÔNG MÔN: TIN HỌC 8[r]

UBND HUYỆN CỦ CHI MA TRẬN ĐỀ KIỂM TRA HỌC KỲ II TRƯỜNG THCS PHÚ HÒA ĐÔNG MÔN: TIN HỌC 8

Đề 1:

Cấp độ

Chủ đề

Nhận biết Thông hiểu

Vận dụng

Tổng cộng Cấp độ thấp Cấp độ cao

1 Câu lệnh

lặp

Biết được cú pháp câu lệnh lặp

Sử dụng câu lệnh để giải bài toán đơn giản

Số câu

Số điểm

1 2

1 3

2 5

2 Lặp với số

lần chưa

biết trước

Biết được cú pháp câu lệnh

Số câu

Số điểm

1 1

1 1

3 Làm việc

với dãy số

Sử dụng câu lệnh để giải bài toán đơn giản

Số câu

Số điểm

1 4

1 4

Tổng số câu

Tổng số điểm

2 3

2 7

4 10

Thời gian : 45 phút

Đề 1:

Câu 1: Viết cú pháp câu lệnh lặp với số lần biết trước ? Giải thích cú pháp ? (2 điểm)

Câu 2: Viết cú pháp câu lệnh lặp với số lần chưa biết trước ? (1 điểm)

Câu 3: Viết chương trình tính tổng của N số nguyên đầu tiên ? (3 điểm)

Câu 4: Viết chương trình tìm giá trị nhỏ nhất, lớn nhất của dãy số ? (4 điểm )

Đề 1:

Câu 1:

For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh> ; (1 điểm ) Trong đó : - For, to, do là các từ khóa

- Biến đếm là biến số nguyên

- Số lần lặp được tính bằng : giá trị cuối – giá trị đầu + 1 (1 điểm)

Câu 2:

While <điều kiện> do <câu lệnh> ; (0,5 điểm)

- Điều kiện thường là một phép so sánh

- Câu lệnh có thể là câu lệnh đơn giản hay câu lệnh ghép (0,5 điểm)

Câu 3:

Program Tinh_Tong ;

Uses crt ;

Var n, i : integer ;

S : real ; (1 điểm) Begin

Clrscr ;

Write(‘Nhap vao so luong so tu nhien can tinh : ’) ; Readln(n) ; (0,5 điểm) S:= 0 ;

For i:=1 to n do S:= S + i ; (1 điểm) Write(‘ Tong cua ’, n, ‘so tu nhien dau tien la : ’ , S) ;

Readln

End (0,5 điểm)

Câu 4:

Program MaxMin ;

Uses crt ;

Var i, n, Max, Min : integer ;

A: array [1 100] of integer ; (1 điểm) Begin

Clrscr ;

Write(‘ Hay nhap do dai cua day so, N = ’ ) ; readln(n) ; (0,5 điểm) Writeln(‘ Nhap cac phan tu cua day so : ’ ) ;

For i:=1 to n do

Write(‘ a[‘ , i , ’] = ’ ) ; readln( a[i] ) ;

For i:=2 to n do

Begin

If Max < a[i] then Max:=a[i] ;

If Min > a[i] then Min:=a[i] ;

Writeln(‘ So lon nhat la : ’ , Max) ;

Write(‘ So nho nhat la : ’ , Min) ;

Readln

TRƯỜNG THCS PHÚ HÒA ĐÔNG MÔN: TIN HỌC 8

Đề 2:

Cấp độ

Chủ đề

Cấp độ thấp Cấp độ cao

4 Câu lệnh

lặp

Biết được cú pháp câu lệnh lặp

Số câu

Số điểm

1 2

1 2

5 Lặp với số

lần chưa

biết trước

Áp dụng được câu lệnh để giải bài toán

Số câu

1 2

6 Làm việc

với dãy số

Biết được cú pháp khai báo biến mảng

Sử dụng câu lệnh để giải bài toán đơn giản

Số câu

Số điểm

1 2

1 4

2 6

Tổng số câu

Tổng số điểm

2 4

2 6

4 10

Thời gian : 45 phút

Đề 2:

Câu 1: Viết cú pháp câu lệnh lặp với số lần biết trước ? Giải thích cú pháp ? (2 điểm)

Câu 2: Viết cú pháp khai báo biến mảng ? (2 điểm)

Câu 3: Viết chương trình tính tổng của 100 số nguyên chẵn đầu tiên ? (2 điểm)

Câu 4: Viết chương trình tìm giá trị nhỏ nhất, lớn nhất của dãy số ? (4 điểm )

Đề 2:

Câu 1:

For <biến đếm> := <giá trị đầu> to <giá trị cuối> do <câu lệnh> ; (1 điểm )

Trong đó : - For, to, do là các từ khóa.

- Biến đếm là biến số nguyên

- Số lần lặp được tính bằng : giá trị cuối – giá trị đầu + 1 (1 điểm)

Câu 2:

Var <Tên biến mảng > : array [ <chỉ số đầu> <chỉ số đầu> ] of < kiểu dữ liệu > ; (1 điểm)

- Chỉ số đầu và cuối là 2 số nguyên : chỉ số đầu <= chỉ số cuối

- Kiểu dữ liệu chỉ có thể là Real hoặc Integer (1 điểm)

Câu 3:

Program Tong_Nguyen_Chan ;

Uses crt ;

Var dem, i, S : integer ; (0,5 điểm) Begin

Clrscr ;

S:= 0 ; dem:= 0 ; i:= 2 ; (0,5 điểm) While dem < 100 do

Begin

S := S + i ;

i := i + 2 ; dem := dem + 1;

End ; (0,5 điểm) Write(‘ Tong cua 100 so nguyen chan dau tien la : ’ , S) ;

Readln

End (0,5 điểm)

Câu 4:

Program MaxMin ;

Uses crt ;

Var i, n, Max, Min : integer ;

A: array [1 100] of integer ; (1 điểm) Begin

Clrscr ;

Write(‘ Hay nhap do dai cua day so, N = ’ ) ; readln(n) ; (0,5 điểm)

Writeln(‘ Nhap cac phan tu cua day so : ’ ) ;

For i:=1 to n do

Begin

Write(‘ a[‘ , i , ’] = ’ ) ; readln( a[i] ) ;

Max:= a[1] ; Min:= a[1] ; (0,5 điểm) For i:=2 to n do

Begin

If Max < a[i] then Max:=a[i] ;

If Min > a[i] then Min:=a[i] ;

Writeln(‘ So lon nhat la : ’ , Max) ;

Write(‘ So nho nhat la : ’ , Min) ;

Readln