Đề kiểm tra 15 môn Tin học lớp 821904

Dấu gạch ngang - Cõu 5: Trong Pascal, để tăng biến X lờn 1 đơn vị ta thực hiện lệnh: Cõu 6: Muốn khai bỏo hằng dựng từ khúa: Cõu 7: Hóy viết cỏc biểu thức toỏn học dưới đõy bằng kớ hiệu

đề kiểm tra 15’

môn tin học lớp 8

* Học sinh khoanh tròn vào câu trả lời đúng

Cõu 1: Phộp gỏn trong ngụn ngữ lập trỡnh Pascal được viết như thế nào?

Cõu 2: Cấu trỳc của một chương trỡnh Pascal gồm:

A Tập hợp cỏc kớ hiệu và nguyờn tắc

B Phần khai bỏo và thõn chương trỡnh

C Từ khúa và tờn

D Bảng chữ cỏi, cỏc quy tắc để viết cõu lệnh và cỏch bố trớ cõu lệnh

Cõu 3: Biến trong lập trỡnh cú chức năng:

A Lưu trữ dữ liệu

B Hỗ trợ cho việc thực hiện cỏc phộp tớnh trung gian

C Cú thể nhận nhiều giỏ trị khỏc nhau

D Cả A, B, C đều đỳng

Cõu 4: Để ngăn cỏch giữa cỏc biến trong danh sỏch biến ta dựng dấu:

A Dấu chấm (.) B Dấu phẩy (,) C Dấu chấm phẩy (;) D Dấu gạch ngang (-)

Cõu 5: Trong Pascal, để tăng biến X lờn 1 đơn vị ta thực hiện lệnh:

Cõu 6: Muốn khai bỏo hằng dựng từ khúa:

Cõu 7: Hóy viết cỏc biểu thức toỏn học dưới đõy bằng kớ hiệu trong Pascal? (2 điểm)

A

B

Cõu 8: Tờn nào là hợp lệ trong chương trỡnh Pascal:

Cõu 9: Muốn thoỏt khỏi Turbo Pascal ta nhấn tổ hợp phớm nào?

 đáp án- BIểU ĐIểM

7 A a*a/((2*b+c)*(2*b+c))

B 1+1/2+1/(2*3)+1/(3*4)+1/(4*5)

2

2

2

a

b  c

1

2 2.3 3.4 4.5

9 B 1

Ti ết 25 đề 1:

Họ tên: đề kiểm tra 45’

Lớp: môn tin học lớp 8

I TRẮC NGHIỆM (6 điểm)

Hóy khoanh trũn vào chữ cỏi đứng đầu mỗi cõu trả lời đỳng (Mỗi cõu đỳng đạt 0,5 điểm)

Cõu 1 Trong cỏc tờn sau đõy, tờn nào là hợp lệ trong ngụn ngữ Pascal ?

a 8a b Program c Bai1 d bai tap

a Documents b Program c End d Bengin

Cõu 3 Trong Pascal, để dịch chương trỡnh ta sử dụng tổ hợp phớm nào ?

a Ctrl + F9 b F9 + F3 c Alt + F9 d Alt + F5

Câu 4 Từ khoá để khai báo biến trong ngôn ngữ lập trình Pascal là ?

Câu 5 Trong Pascal, để chạy một chương trình Pascal ta nhấn tổ hợp phím ?

a Ctrl+F9 b Alt+F9 c Shitf+F9 d Ctrl+Shift+F9

Câu 6 Máy tính có thể hiểu trực tiếp ngôn ngữ nào trong các ngôn ngữ dưới đây ?

a Ngôn ngữ tự nhiên b Ngôn ngữ lập trình.

c Ngôn ngữ máy. d Ngôn ngữ tiếng Việt

Câu 7 : Đánh dấu x vào ô lựa chọn (2 điểm)

a) Từ khóa khai báo tên chương trình trong ngôn ngữ lập trình Pascal là Begin

b) Chương trình máy tính là dãy các lệnh mà máy tính có thể hiểu và thực hiện được

c) Ngôn ngữ dùng để viết các chương trình máy tính được gọi là ngôn ngữ lập trình

d) Cấu trúc chung của chương trình không bắt buộc phải có phần thân chương trình

Cõu 8: Hóy điền từ cũn thiếu vào chỗ trống trong cõu sau: (1 điểm)

Quỏ trỡnh giải bài toỏn trờn mỏy tớnh gồm ………… bước, đú là:

- ……… bài toỏn.

- Mụ tả ………

- ……… trỡnh.

II TỰ LUẬN (4 Đ)

Cõu 1 (2đ): Viết 1 chương trỡnh Pascal hoàn chỉnh để tớnh diện tớch hỡnh vuụng,

trong đú số đo của cạnh được nhập từ bàn phớm

Câu 2 (1đ): Hãy chuyển các biểu thức được viết trong Pascal sau đây thành các biểu thức toán học.

a) (a + b)*(a + b)- x/y;

b) b/(a*a + c);

Cõu 3 (1đ): Hóy xỏc định bài toỏn tớnh tổng 100 số tự nhiờn đầu tiờn

Đáp án tiết 25 đề 1:

* TRẮC NGHIỆM

Mỗi câu trả lời đúng đạt 0,5 điểm

Đ, d- S 3, xác viết chươngđịnh, thuật toán,

* TỰ LUẬN

Câu 1:

Program ct;

Var canh,S:integer;

Begin

Write(‘ban hay nhap vao so do cạnh cua vuong’);

Readln(canh);

S:=canh * canh;

Writeln(‘dien tich vuong la:’,S);

Readln End

Câu 2:

y

x b

a  2 

) (

) ( a2 c

b



Câu 3: Input: Dãy 100 số tự nhiên đầu tiên 1, 2, 3, , 100

Output: Tổng của dẫy số 1+ 2+ 3+ …+100

Tiết 25 ĐỀ 2:

I Trắc nghiệm: Chọn phương ỏn đỳng nhất (6đ).

Cõu 1: Cấu trỳc một chương trỡnh gồm mấy phần?

Cõu 2: Ngụn ngữ lập trỡnh gồm cú những gỡ?

A Tập hợp cỏc kớ tự B Cỏc qui tắc

C Cả A và B D í tưởng – giải thuật

Cõu 3: Trong Turbo Pascal, để chạy chương trỡnh sử dụng tổ hợp phớm nào?

Cõu 4: Kết quả của phộp chia 9 mod 4 là?

Cõu 5: Giỏ trị của c sau khi thực hiện đoạn lệnh sau là bao nhiờu?

a:= 6; b:= 9

a:= b – a; c:= a + b;

Cõu 6: Trong Pascal, X cú kiểu dữ liệu là số thực, để khai bỏo biến X ta cú thể khai bỏo như:

A Var X: integer; B Var X : real;

C Var X : char; D Var X : string;

Câu 7 : Đánh dấu x vào ô lựa chọn (2 điểm)

a) Từ khóa khai báo tên chương trình trong ngôn ngữ lập trình Pascal là Begin

b) Chương trình máy tính là dãy các lệnh mà máy tính có thể hiểu và thực hiện được

c) Ngôn ngữ dùng để viết các chương trình máy tính được gọi là ngôn ngữ lập trình

d) Cấu trúc chung của chương trình không bắt buộc phải có phần thân chương trình

Cõu 8: Hóy điền từ cũn thiếu vào chỗ trống trong cõu sau: (1 điểm)

Quỏ trỡnh giải bài toỏn trờn mỏy tớnh gồm ………… bước, đú là:

- ……… bài toỏn.

- Mụ tả ………

- ……… trỡnh.

II Tự luận: (4đ)

Cõu 1: (1đ) Viết cỏc biểu thức toỏn học sau đõy dưới dạng biểu thức được viết bằng Pascal.

a) 5x3 + 2x2 – 8x + 15 b)

4

2

2a2  c2a

Cõu 3: (1đ) Chương trỡnh sau đõy cú hợp lệ khụng? Nếu khụng hóy chỉnh sửa lại cho hoàn chỉnh.

Program tinhtong;

Begin

Writeln (‘Nhap sp nguyen duong a: ‘); Readln (a);

Writeln (‘Nhap sp nguyen duong b: ‘); Readln (b);

S:= a + b Writeln (‘Tong hai so nguyen duong a va b la: ‘,S:2:2) Readln;

Var a, b: integer;

S: real;

Câu 4: (2đ) Viết chương trình: Nhập vào giá trị chiều dài và chiều rộng của một hình chữ nhật

In ra màn hình diện tích của hình chữ nhật đó

Đáp án tiết 25 đề 2:

* TRẮC NGHIỆM

Mỗi câu trả lời đúng đạt 0,5 điểm

Đ, d- S 3, xác viết chươngđịnh, thuật toán,

* TỰ LUẬN

Câu 1:

a 5*x*x*x+2*x*x-8*x+15 b (2*a*a+2*c*c-a)/4

Câu 2:

Program tinhtong;

Var a, b: integer;

S: real;

Begin

Writeln (‘Nhap sp nguyen duong a: ‘); Readln (a);

Writeln (‘Nhap sp nguyen duong b: ‘); Readln (b);

S:= a + b;

Writeln (‘Tong hai so nguyen duong a va b la: ‘,S:2:2);

Readln;

End

Câu 3:

Program dientich;

Var cd, cr:integer;

Dt:Real;

Begin

Write(‘ban hay nhap vao so do cd va cr cua hinh chu nhat’);

Readln(cd, cr);

dt:= cd * cr;

Writeln(‘dien tich chu nhat la:’,dt:2:2);

Readln End

KIỂM TRA THỰC HÀNH(15 phỳt)

*Đề bài:

Câu 1: Thực hiện yêu cầu sau:

a) Viết – chạy và sửa lỗi (nếu có) chương trình ghi ra màn hình kết quả tổng của hai số

tự nhiện a và b được nhập vào từ bàn phím.

b) Lưu vào máy tính với tên: Tong.Pas.

* Đáp án:

a) 8 điểm

Program Tong;

Var a, b, c: Integer;

Begin

Write (‘ Nhap vao so thu nhat a=’); Readln(a);

Write (‘ Nhap vao so thu hai b =’); Readln(b);

c: = a+ b;

Writeln (‘ Tong cua hai so la: ‘,c);

Readln;

End.

b) 2 điểm

- Soạn thảo, thao tác nhanh, trình bày đẹp.

Tiết: 31

KIỂM TRA THỰC HÀNH TIN 8 (45 PHÚT)

I.MỤC TIÊU :

1 Kiến thức:Viết được câu lệnh điều kiện if…then trong chương trình.

2 Kỹ năng: Rèn kĩ năng viết chương trình

3 Thái độ

 Có ý thức cao trong học tập, sáng tạo và tư duy

 Nghiêm túc trong kiểm tra

II PHƯƠNG PHÁP: Kiểm tra thực hành trên máy

III CHUẨN BỊ :

1 Giáo viên: - Đề kiểm tra, Giáo án, phòng máy

2 Học sinh :- Ôn bài tước

IV TIẾN TRÌNH KIỂM TRA :

1.Ổn định tổ chức lớp (1phút)

2 Đề kiểm tra:

Đề 1: Hãy viết chương trình tính tiền công lao động biết một giờ bình thường làm 15000đ còn ngoài

giờ hoặc ngày lễ được tính gấp đôi

Công thức tính tiền công như sau:

Tien_cong : = So_gio* don_gia + so_ngoai_gio *don_gia *2;

Đề 2: Hãy viết chương trình so sánh chiều cao của 2 bạn Minh và Tuấn

Đáp án:

Đề 1: Progam tinh_tien_cong;

Const don_gia =15000;

Var So_gio, so_ngoai_gio, Tien_cong : real;

Begin

Write(‘ Hay nhap so gio lam ngay thuong: ‘);

Readln( So_gio );

Writeln(‘ Hay nhap so gio lam ngoai gio: ‘);

Readln( so_ngoai_gio);

Tien_cong : = So_gio* don_gia + so_ngoai_gio *don_gia *2;

Writeln(‘ So tien cong: =‘ , Tien_cong : 9:3, ‘ VND’ );

Readln End

Đề 2:

Program sosanh;

Uses crt;

Var chieucaominh, chieucaotuan:real;

Begin

Write(‘nhap chieu cao ban minh:’); readln(chieucaominh);

Write(‘nhap chieu cao ban Tuan:’); readln(chieucaotuan);

If chieucaominh>chieucaotuan then writeln (‘ban minh cao hon ban tuan’)

else if chieucaominh<chieucaotuan then writeln (‘ban tuan cao hon’) else writeln (‘Hai bạn bằng nhau’);

Readln;

End

Tiết 36 đề 1:

KIỂM TRA HỌC KÌ I TIN 8

I.Mục tiêu :

1 Kiến thức:Tổng hợp kiên thức đã học

2 Kỹ năng: Vận dụng kiến thức đã học để giải bài toán.

3 Thái độ: Có thái độ nghiêm túc

II Phương pháp: - Thực hành cá nhân.

III Chuẩn bị :

1 Giáo viên: - Đề kiểm tra; SGK, SGV, tài liệu, Giáo án

2 Học sinh :- Ôn bài

IV Tiến trình tiết dạy :

1.Ổn định tổ chức lớp (1phút)

2.Đề kiểm tra

Đề 1 :

Hãy viết chương trình nhập vào ba số nguyên từ bàn phím, kiểm tra và thông báo ra màn hình số lớn nhất ?

3 Đáp án :

Đề 1:

Program bài1;

Uses crt ; Var a, b, c, max :Integer;

Begin Clrscr ; Write(‘nhap so ba so nguyen : = ’) ; readln(a, b, c) ; Max : = a;

If max < b then max:=b ;

If max < c then max:=c ; Writeln (‘so lon nhat la:’, max) Readln ;

End

H ỌC Kè 2:

Họ tên: đề kiểm tra 15’

Lớp: môn tin học lớp 8

Dề bài :

Hóy viết chương trỡnh bằng ngụn ngữ Pascal tớnh tổng của 20 số tự nhiờn đầu tiờn ?

ĐÁP ÁN

program ct;

var s, i : integer;

begin

s:=0;

For i:=1 to 20 do

S:=s+i;

writeln(‘Tong cua 20 so tu nhien dau tien la =’,s) ;

readln ;

end.

Tuần: 26 Ngày soạn: 2/3/2013

KIỂM TRA 1 TIẾT TIN 8 I.Mục đích

1 Kiến thức

 Kiểm tra các kiến thức đã học

 Tổng hợp lại kiến thức và khắc sâu

2.Kĩ năng

 Đọc hiểu chương trình

3.Thái độ

 Có ý thức tư duy, có thái độ ham học hỏi, tác phong làm việc nghiêm túc

II Phương pháp

 Trắc nghiệm khách quan – tự luận

III Chuẩn bị :

1 Giáo viên : - Đề kiểm tra, Ma trận

2 Học sinh : - Thước, bút, học bài ở nhà

IV Ma trận đề:

Cấp độ tư duy Nội dung

Bài7 :Câu lệnh lặp 1, 2(2 điểm) 3(2 điểm) B1(4 điểm) 8 điểm

Bài 8 : Lặp với số lần chưa biết trước. 4(1 điểm) 5 (1 điểm) 2 điểm

V/ Đề kiểm tra

A) Trắc nghiệm : Hãy khoanh tròn vào câu đúng (6 ĐIỂM)

Câu 1 : Câu lệnh Pascal sau câu nào đúng ?

a) For i := 1 to 10 ; do x :=x+1 ; b ) For i := 10 to 1 do x :=x+1 ;

c) For i :=1 to 10 do x :=x+1 ; d) For i =1 to 10 do x :=x+1 ;

Câu 2 : Trong câu lệnh lặp for i :=0 to 10 do begin…end ; các lệnh ghép được thực hiện bao nhiêu lần? a) Không lần nào B) 11 lần c) 2 lần d) 10 lần

Câu 3 : Sau khi thực hiện chương trình sau biến j,k nhận giá trị bao nhiêu ? (2 điểm)

Đoạn chương trình sau :

Begin

J :=j+1

K :=k+j ; Writeln(j,k) ; End ;

Câu 4 : Trong các hoạt động sau 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 ? a) Tính tổng của 20 số tự nhiên đầu tiên

b) Cần cộng bao nhiêu số tự nhiên đầu tiên để nhận được tổng A nhỏ nhất lớn hơn 500?

c) Cả a và b đúng

d) Cả a và b sai

Câu 5 : Hãy tìm hiểu đoạn chương trình sau đây : Sau khi đoạn chương trình sau được thực hiện, giá trị của x bằng bao nhiêu ?

x :=0 ; tong :=0 ;

while tong<=20 do

begin

writeln(tong) ; tong :=tong+1 ; end ;

x :=tong ;

B Tự luận (4 ĐIỂM)

Bài 1 : Viết chương trình sử dụng for do hoặc while do để tính tổng sau

S = 1 +

20

1

4

1 3

1 2

1







VI Đáp án :

Câu 3 : i=6 ; k=22 ; Câu 4 : b

Câu 5 : b

Bài 1 : Viết chương trình tính tổng :

Program tong ;

Var s : real ; i : integer ; 1 điểm

Begin

For i := 1 to 20 do

Writeln( ‘ Tổng là :’,s) ; 0,5 điểm

Readln ;

End

V/ Thống kê chất lượng bài kiểm tra:

Giỏi: em (đạt %); Khá: em (đạt %); TB: em (đạt %); Yếu: em (chiếm %);

KIỂM TRA 15’ (TH)

Môn tin 8

Đề bài:

Viết chương trình Pascal sử dụng biến mảng để nhập từ bàn phím một dẫy số gồm 7 phần tử Tính tổng cho dãy số được nhập vào

Đáp án:

Program tb;

Uses crt;

var i, tong: integer;

A: array[1 7] of real;

Begin

write('Nhap so phan tu cua mang’);

for i:=1 to 7 do

write('a[‘,I,']=’); readln(a[i]);

tong:=0;

For i:=1 to 7 do

tong:=tong+a[i];

Writeln(‘tong của day so là:’,tong);

Readln;

End

Tuần: 32 Ngày soạn: 13/4/2013

KIỂM TRA 1 TIẾT(TH) I.Mục đích

1 Kiến thức

 Kiểm tra các kiến thức đã học

 Tổng hợp lại kiến thức và khắc sâu

2.Kĩ năng

 Viết được chương trình

3.Thái độ

 Có ý thức tư duy, có thái độ ham học hỏi, nghiêm túc trong kiểm tra

II Phương pháp

 Thực hành

III Chuẩn bị :

1 Giáo viên : - Đề kiểm tra, phòng máy

2 Học sinh :- Bút, giấy nháp.

IV Tiến trình kiểm tra

1 Ổn định tổ chức

2 Phát đề kiểm tra

3 Làm bài

Đề kiểm tra :

Viết chương trình Pacscal sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số

Độ dài dãy số được nhập từ bàn phím In ra màn hình các số có giá trị chẵn trong dãy ?

Yêu cầu :

- Nhập độ dài của dãy số : N

- Nhập dãy số

- In ra màn hình các số chẵn

4 Đáp án

Program sonnhonhat ;

Uses crt ;

Var i, n: Integer ;

A : array[1 200] of integer ;

Begin

Clrscr ; Write(‘nhap n’) ; Readln(n) ; For i :=1 to n do

Begin Write(‘a(‘,i,’)=’) ; Readln(a[i]) ; End ;

t := 0;

For i:=1 to n do

If a[i] mod 2 = 0 then Begin

Write(a[i]:5); t := t+ a[i];

End;

Readln;

End

5 GV yêu cầu hs chạy chương trình và chấm bài trực tiếp trên máy.

Tuần: 34 Ngày soạn: 20/4 /2013

Kiểm tra học kì ii

a Mục tiêu.

1 Kiến thức:

- N ắm chắc kiến thức lý thuyết đó học

- Viết đúng chương trình, dịch, sửa lỗi và chạy chương trình trên máy tính.

2 Kỹ năng: Thao tác thực hiện nhanh chóng, chính xác.

3 Thái độ: Nghiêm túc trong kiểm tra.

B đề bài

* Ph ần lý thuyết (2 điểm)

Mỗi học sinh sẽ được bốc thăm một cõu hỏi trong cỏc cõu hỏi sau và trả lời trực tiếp (theo hỡnh thức vấn đỏp)

Cõu 1: Kể tờn một số hoạt động lặp với số lần biết trước?

Cõu 2: Biến đếm trong vũng lặp For là biến kiểu gỡ?

Cõu 3: Cỏch tớnh số vũng lặp trong cõu lệnh lặp với số lần biết trước?

Cõu 4: kể tờn một số hoạt động lặp với số lần chưa biết trước?

Cõu 5: Như thế nào là lặp vụ hạn lần?

Cõu 6: Kiểu dữ liệu mảng là gỡ?

Cõu 7: Biến mảng là gỡ?

Cõu 8: Lợi ớch của việc sử dụng biến mảng và cõu lệnh lặp là gỡ ?

* Ph ần thực hành (8 điểm)

Học sinh làm bài trực tiếp trờn mỏy tớnh.

Đề 1:

1 Khởi động chương trình Pascal (0,5 điểm).

2 Viết chương trình.

- Viết chương trình nhập vào một dãy n số nguyên (2 điểm).

- In ra màn hình các số chẵn trên một hàng (2 điểm).

- In ra màn hình các số lẽ trên một hàng (2 điểm).

3 Lưu chương trình với tên của em (0,5 điểm)

4 Dịch, sửa lỗi nếu có  chạy chương trình và kiểm tra kết quả (0,5 điểm)

5 Thoát khỏi chương trình Pascal (0,5 điểm).

Đề 2:

1 Khởi động chương trình Pascal (0,5 điểm).

2 Viết chương trình.

- Viết chương trình nhập vào một dãy n số nguyên (2 điểm).

- In ra màn hình các số dương trên một hàng (2 điểm).

- In ra màn hình các số âm trên một hàng (2 điểm).

3 Lưu chương trình với tên của em (0,5 điểm)

4 Dịch, sửa lỗi nếu có  chạy chương trình và kiểm tra kết quả (0,5 điểm)

5.Thoát khỏi chương trình Pascal (0,5 điểm).

D Đáp án

* Phần lý thuyết

Cõu 1: Đỏnh răng, ăn cơm, tắm,

Cõu 2: Biến đếm trong vũng lặp For là biến kiểu nguyờn

Cõu 3: Giỏ trị cuối – giỏ trị đầu + 1

Cõu 4: nhặt rau, học bài, gọi đieẹn thoại

Cõu 5: Điều kiện trong vũng lặp luụn luụn đỳng

Cõu 6: Kiểu dữ liệu mảng là một tập hữu hạn cỏc phần tử cú thứ tự, mọi phần tử đều cú chung một kiểu dữ liệu

Cõu 7: Biến mảng là biến cú kiểu dữ liệu là kiểu mảng

Cõu 8: Giỳp cho việc viết chương trỡnh được ngắn gọn và dễ dàng hơn

* Ph ần thực hành

Đề 1:

1 Nháy đúp vào biểu tượng Pascal trên màn hình nền để khởi động Pascal.

2 Gõ chương trình sau:

Program inchanle;

Uses crt;

Var n, i, t: integer;

a :array [1 100] of integer;

Begin

Write(‘Moi nhap do dai cua day so n =’); readln(n);

For i := 1 to n do

Begin

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

End;

Write(‘Cac so le la:’);

For i:=1 to n do

If a[i] mod 2 <> 0 then Write(a[i]:5);

Write(‘Cac so chan la:’);

For i:=1 to n do

If a[i] mod 2 = 0 then Write(a[i]:5);

Readln;

End.

Đề 2:

1 Nháy đúp vào biểu tượng Pascal trên màn hình nền để khởi động Pascal.

2 Gõ chương trình sau:

Program inamduong;

Uses crt;

Var n, i, t: integer;

a :array [1 100] of integer;

Begin

Write(‘Moi nhap do dai cua day so n =’); readln(n);

For i := 1 to n do

Begin

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

End;

Write(‘Cac so am la:’);