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

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đ