Kiểm tra tin 7

Chia sẻ bởi Hồ Bá Hoàng | Ngày 16/10/2018 | 50

Chia sẻ tài liệu: kiểm tra tin 7 thuộc Tin học 7

Nội dung tài liệu:

ĐỀ KIỂM TRA TIN HỌC 8

1. MA TRẬN ĐỀ
Nội dung
CÁC MỨC ĐỘ NHẬN THỨC
Tổng


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



TNKQ
TL
TNKQ
TL
TNKQ
TL


Câu lệnh điều kiện

1(1đ)
Biết điều kiện của bài toán đúng hay sai

1(1đ)
Hiểu được điều kiện đúng thì thực hiện câu lệnh

4(1đ)
Vận dụng câu lệnh điều kiện vào câu 4
3đ

Mô tả thuật toán

1(đ)
Biết cách mô tả thuật toán, biết các bước để giải bài toán



1(đ)
Vận dụng các bước giải bài toán và mô tả được thuật toán của bài toán
2đ

Khai báo chương trình

3,4(0.5đ)
Biết đề bài có những biến nào

3,4(0.5đ)
Hiểu được cách khai báo các biến

3,4(1đ)
Vận dụng khai báo được các biến
2đ

Phần thân chương trình



3,4(1đ)
Nắm được phép gán công thức

3,4(2đ)
Vận dụng câu lệnh để nhập dữ liệu từ bàn phím, gán công thức cho biến
3đ

Tổng

2.5đ

2.5đ

5đ
10đ


2. ĐỀ THI
Câu 1:(2 điểm) Sau khi chạy đoạn chương trình sau, giá trị của x sẽ là bao nhiêu?
x:=5; a=6; if x>6 then x:=x+1; a:= x+a;
a:=4; x:=2; if a mod 2 =0 then
begin a:=a+1; x:=x+a; end;

Câu 2: (2 điểm) Mô tả thuật toán tính diện tích hình chữ nhật.
Câu 3: (3 điểm) Viết chương trình nhập hai số nguyên m,n. Sau đó in ra màn hình tổng, hiệu của chúng.
Câu 4: (3 điểm) Cho thuật toán tìm số lớn nhất trong ba số nhập vào từ bàn phím như sau:
Bước 1: nhập ba số a, b, c
Bước 2: Max:=a
Bước 3: Nếu b>max thì max:=b
Bước 4: Nếu c>max thì max:=c
Bước 5: In ra max
Em hãy chuyển thuật toán trên thành chương trình.

3. ĐÁP ÁN

Câu 1: a) x=5; b) x=7;
Câu 2: Mô tả thuật toán tính diện tích hình chữ nhật
B1: nhập chiều dài, chiều rộng
B2: s( a*b
B3: in kết quả
B4: kết thúc chương trình
Câu 3: viết chương trình
Program tinh;
`Uses crt;
Var a, b: integer;
Begin
Writeln(‘nhap so nguyen a:=’); readln(a);
Writeln(‘nhap so nguyen b:=’); readln(b);
Writeln(‘tong cua hai so nguyen la: ‘, a+b);
Writeln(‘hieu cua hai so nguyen la: ‘, a-b);
Readln;
End.
Câu 4: Viết chương trình
Program solonnhat;
User crt;
Var a,b,c,max: real;
Begin
Writeln(‘nhap 3 so a,b,c’); readln(a,b,c);
Max:=a;
If b>max then max:=b;
If c>max then max:=c;
Writeln(‘so lon nhat la:’,max);
Readln;
End.
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...

Người chia sẻ: Hồ Bá Hoàng
Dung lượng: 41,00KB| Lượt tài: 0
Loại file: doc
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)