[r]
Trang 12 4
1 3
1 2
1
1
) ( 4
5 ) ( 2
c a b c a
Kiểm tra 1 tiết: Tin học 8
Bài số 1
- -Họ và tên: Lớp Đề 1
I.Trắc nghiệm(3 điểm)
Khoanh tròn phơng án trả lời đúng:
Câu 1: Trong các tên sau, tên nào hợp lệ trong ngôn ngữ lập trình Pascal?
Câu 2: Câu lệnh nào sau đây khai báo đúng?
a.Const ten lop = '8a'; b.Const tenlop = '8a';
c.Var 8a:string; d.Var diem: real;
Câu 3: Hãy cho biết cặp kết quả in ra màn hình của các câu lệnh Write(10); và
Writeln('100');
II.Tự luận:(7 điểm)
Câu 1: Viết các biểu thức toán dới đây bằng ngôn ngữ lập trình Pascal:
a.
b.
Câu 2: Hãy liệt kê các lỗi (nếu có) trong chơng trình Pascal dới đây v sửa lại choà
đúng
Const Pi := 3.1416;
Var R: real; Cv, Dt: integer;
Begin
R = 5.5;
Cv := 2*pi*r
Dt := pi*R*R;
Writeln('Chu vi hinh tron la: ',Cv);
Writeln('Dien tich hinh tron la: ',Dt);
Readln End
Kiểm tra 1 tiết: Tin học 8
Bài số 1
- -Họ và tên: Lớp Đề 2
I.Trắc nghiệm(3 điểm)
Khoanh tròn phơng án trả lời đúng:
Câu 1: Trong các tên sau, tên nào hợp lệ trong ngôn ngữ lập trình Pascal?
Trang 22 4
1 3
1 2
1
1
) ( 4
5 ) ( 2
c a b c a
Câu 2: Câu lệnh nào sau đây khai báo đúng?
a.Const tenkhoi = 'khoi8'; b.Const ten khoi = 'khoi8';
c.Var cannang: real; d.Var 7a:string;
Câu 3: Hãy cho biết cặp kết quả in ra màn hình của các câu lệnh Write(100); và
Writeln('10');
II.Tự luận:(7 điểm)
Câu 1: Viết các biểu thức toán dới đây bằng ngôn ngữ lập trình Pascal:
A.
B.
Câu 2: Hãy liệt kê các lỗi (nếu có) trong chơng trình Pascal dới đây v sửa lại choà
đúng
Const Pi := 3.1416;
Var R: real; Cv, Dt: integer;
Begin
R = 5.5;
Cv := 2*pi*r
Dt := pi*R*R;
Writeln('Chu vi hinh tron la: ',Cv);
Writeln('Dien tich hinh tron la: ',Dt);
Readln End
Đáp án và biểu điểm:
Đề 1:
I.Trắc nghiệm: 3 điểm
Mỗi phơng án chọn đúng: 0.5 điểm
II.Tự luận: 7 điểm
Đối với câu 2, sau khi học sinh nêu lỗi nếu học sinh chỉ sửa các câu có lỗi không viết lại chơng trình vẫn cho điểm tối đa
Câu 1: (3 điểm) Mỗi câu viết đúng 1.5 điểm.
A 1+1/2+1/3+1/4 >= 2
B 1/(b+2)*(a*a + c) <>5/(b+4)*(a + c*c)
Câu 2: (4 điểm) Mỗi ý 1 điểm
Các lỗi trong chơng trình:
1.Thừa dấu hai chấm ở dòng 1(chỉ cần dấu bằng)
2.Dòng 2 khai báo kiểu dữ liệu biến Cv, Dt không phù hợp Bán kính R có kiểu dữ liệu là số thực thì kết quả của các phép toán sẽ cho giá trị Cv, Dt có kiểu dữ liệu là
số thực ( Cv, Dt: real; )
3.Dòng 4 cách gán giá trị không đúng cú pháp, thiếu dấu hai chấm trớc dấu bằng
4.Thiếu dấu chấm phẩy cuối dòng 5
Sửa các lỗi:
Trang 3Const Pi = 3.1416;
Var R, Cv, Dt: real;
Begin
R := 5.5;
Cv := 2*pi*r;
Dt := pi*R*R;
Writeln('Chu vi hinh tron la: ',Cv);
Writeln('Dien tich hinh tron la: ',Dt);
Readln End
Đề 2:
I.Trắc nghiệm: 3 điểm
Mỗi phơng án chọn đúng: 0.5 điểm
II.Tự luận: 7 điểm
Tơng tự đề chẵn
Ngày tháng năm 2009
Giáo viên ra đề:
Trơng Thị Lệ Chi