rường THCS Xã Lát
Họ tên:………………………………………..
Lớp:……………
Ngày………..….tháng…...…...năm 20……..

Kiểm tra học kì I – Năm học 2015-2016
Môn: Tin học – Lớp 8
Thời gian: 45 phút

Điểm


Lời phê của giáo viên


ĐỀ BÀI THỰC HÀNH


Để viết chương trình tính diện tích hình chữ nhật với cạnh (chiều dài, chiều rộng) do người dùng nhập từ bàn phím dưới đây, bạn Tiến đã ghi lại chương trình ra giấy,  nhưng cố tình xếp lộn xộn các lệnh và viết sai một số chỗ, sau đó Tuấn đố bạn Hoa sửa lại cho đúng.

Var a, b, S, CV: real;
Program Chu nhat;
Uses crt
Write (`Nhap chieu dai:`); Readln(a);
Write (`Nhap chieu rong:`); Readln(b);
Begin
S := a*b;
CV := (a+b)*2;
Writeln (`Dien tich hinh chu nhat la: `, S );
Writeln (`Chu vi hinh chu nhat la: `, CV:10:2 );
End.
Readln.

A) Em hãy giúp bạn Hoa thay đổi lại trình tự các lệnh và sửa các chỗ sai để được chương trình viết đúng.(7đ)
B) Sau khi chỉnh sửa xong chương trình, hãy gõ vào máy tính, lưu với tên của mình và lớp (VD: Hoa8A1.PAS).(3đ)




……………………..( ((…………………….
ĐÁP ÁN


Câu
Đáp án
Điểm






A

Program Chu_nhat;
Uses crt;
Var a, b, S, CV: real;
Begin
Write(`Nhap chieu dai:`); readln(a);
Write(`Nhap chieu rong:`); readln(b);
S := a*b;
CV := (a+b)*2;
Writeln(`Dien tich hinh chu nhat la: `,S);
Writeln(`Chu vi hinh chu nhat la: `,CV:10:2);
Readln
End.


1đ
1đ
1đ

1đ
1đ




1đ
1đ


B

Chương trình chạy được


3đ