Mục tiêu: I Chuẩn bị:

Một phần của tài liệu Tin 8 Học kỳ II (Trang 51 - 53)

II/ Chuẩn bị:

- Sách giáo khoa, giáo án, tài liệu tin học cĩ liên quan. - Đọc tài liệu ở nhà trớc khi

III. Tiến trình lên lớp:

1. Tổ chức.

2. Kiểm tra.

- Kiểm tra sự chuẩn bị của học sinh . 3. Bài mới:

Hoạt động của giáo viên Hoạt động của học sinh

- GV phát đề cho học sinh - Theo dọi HS làm bài - Thu bài của học sinh

- Học sinh làm bài dới sự theo dõi của GV - Trả bài khi hết giờ và thực hiện các hớng

dẫn của GV

Họ tẽn: ………

Lụựp: 8A …

ẹỀ KIỂM TRA HOẽC KYỉ 2 NAấM HOẽC 2008 – 2009 Mõn: Tin hóc 8 (Thụứi gian 45 phuựt)

A/ LÝ THUYẾT:I/ Traộc nghieọm khaựch quan: I/ Traộc nghieọm khaựch quan:

Khoanh troứn chửừ caựi ủửựng trửụực keỏt quaỷ ủuựng . Cãu 1: Leọnh laởp naứo sau ủãy laứ ủuựng?

E. For <bieỏn ủeỏm>= <giaự trũ ủầu> to <giaự trũ cuõớ> do <cãu leọnh>; F. For <bieỏn ủeỏm>:= <giaự trũ ủầu> to <giaự trũ cuõớ> do <cãu leọnh>; G. For <bieỏn ủeỏm>:= <giaự trũ cuõớ> to <giaự trũ ủầu> do <cãu leọnh>; For <bieỏn ủeỏm>: <giaự trũ ủầu> to <cãu leọnh> do <giaự trũ cuoỏi>;

Cãu 2: Voứng laởp while ..do laứ voứng laởp:

A) Chửa bieỏt trửụực soỏ lần laởp B) Bieỏt trửụực soỏ lần laởp

C.) Bieỏt trửụực soỏ lần laởp nhửng giụựi hán laứ <=100 D) Bieỏt trửụực soỏ lần laởp nhửng giụựi hán laứ >=100

Cãu 3: Cãu leọnh laởp while…do coự dáng ủuựng laứ:

A) While <ủiều kieọn> do; <cãu leọnh>; B) While <ủiều kieọn> <cãu leọnh> do; C) While <cãu leọnh> do <ủiều kieọn>; D) While <ủiều kieọn> do <cãu leọnh>;

Cãu 4: Cho S vaứ i laứ bieỏn nguyẽn. Khi cháy ủoán chửụng trỡnh :

s:=0;

for i:=1 to 5 do s := s+2; writeln(s);

Keỏt quaỷ in lẽn maứn hỡnh laứ cuỷa s laứ :

A.11 B. 55 C. 12 D.13

Cãu 5: Lần lửụùt thửùc hieọn ủoán leọnh: a[1]:=2; a[2]:=3; t:=a[1]+a[2]+1;

Giaự trũ cuỷa t laứ

A) t=1 B) t=2 C) t=3 D) t=6

Cãu 6: Cãu leọnh pascal naứo sau ủãy laứ hụùp leọ?

B) For i:= 1 to 10 do writeln(‘A’); B) For i:=1.5 to 10.5 do writeln(‘A’); (adsbygoogle = window.adsbygoogle || []).push({});

C) For i= 1 to 10 do writeln(‘A’); D) For i:=100 to 1 do writeln(‘A’);

II/ Tửù luaọn:

Vieỏt chửụng trỡnh Pascal sửỷ dúng bieỏn maỷng ủeồ nhaọp tửứ baứn phớm caực phần tửỷ cuỷa moọt daừy soỏ. ẹoọ daứi cuỷa daừy cuừng ủửụùc nhaọp tửứ baứn phớm.

Họ tẽn: ……… Lụựp: 8A …

ẹỀ KIỂM TRA HOẽC KYỉ 2 NAấM HOẽC 2008 – 2009 Mõn: Tin hóc 8 (Thụứi gian 45 phuựt)

B/ THệẽC HAỉNH:

Viết chương trỡnh nhập điểm của cỏc bạn trong lớp. Sau đú in ra màn hỡnh số bạn đạt kết quả học tập loại giỏi, khỏ, trung bỡnh và kộm (theo tiờu chuẩn từ 8.0 trở lờn đạt loại giỏi, từ 6.5

đến 7.9 đạt loại khỏ, từ 5.0 đến 6.4 đạt trung bỡnh và dưới 5.0 xếp loại kộm).

a) Liệt kờ cỏc biến dự định sẽ sử dụng trong chương trỡnh. Tỡm hiểu phần khai bỏo dưới đõy và tỡm hiểu tỏc dụng của từng biến:

program Phanloai; uses crt;

Var

i, n, Gioi, Kha, Trungbinh, Kem: integer; A: array[1..100] of real;

b) Gừ phần khai bỏo trờn vào mỏy tớnh và lưu tệp với tờn Phanloai. Tỡm hiểu cỏc cõu lệnh trong phần thõn chương trỡnh dưới đõy:

Begin

clrscr;

write(‘Nhap so cac ban trong lop, n = ‘); readln(n); writeln(‘Nhap diem:’);

For i:=1 to n do Begin write(i,’. ‘); readln(a[i]); End;

Gioi:=0; Kha:=0; Trungbinh:=0; Kem:=0;

for i:=1 to n do

begin

if a[i]>=8.0 then Gioi:=Gioi+1; if a[i]<5 then Kem:=Kem+1;

if (a[i]<8.0) and (a[i]>=6.5) then Kha:=Kha+1;

if (a[i]>=5) and (a[i]<6.5) then Trungbinh:=trungbinh+1

end;

writeln(‘Ket qua hoc tap:’); writeln(Gioi,’ ban hoc gioi’); writeln(Kha,’ ban hoc kha’);

writeln(Trungbinh,’ ban hoc trung binh’); writeln(Kem,’ ban hoc kem’);

readln

End.

c) Gừ tiếp phần chương trỡnh này vào mỏy tớnh sau phần khai bỏo. Dịch, chạy chương trỡnh.

HệễÙNG DẪN CHẤM – THANG ẹIỂM. A/ LÝ THUYẾT (10 ẹIỂM) (adsbygoogle = window.adsbygoogle || []).push({});

Một phần của tài liệu Tin 8 Học kỳ II (Trang 51 - 53)