Ktra thuc hanh 1 tiet tin lop 9

KIỂM TRA THỰC HÀNH 1 TIẾT

II. Đề bài:
Câu 1. Em hãy viết chương trình tính tổng các số chẳn từ 1 đến 100 (6đ)
Câu 2. Em hãy dịch và sửa lỗi chương trình (nếu có) (2đ)
Câu 3. Em hãy chạy chương trình và kiểm tra kết quả (2đ)
III. Đáp án:
Câu
Nội dung
Điểm

Câu 1:
Viết chương trình tính tổng các số chẳn từ 1 đến 100 (sử dụng vòng lặp không xác đinh)
Program tinh_tong_cac_so_chan;
Var i, S: Integer;
Begin
S:= 0;
i:= 2;
While i <= 100 do
Begin
S:= S+ i;
i:= i + 2;
End;
Writeln( ‘ Tong cac so chẳn tu 1 den 100 =’, S);
Readln;
End.
1đ
1đ



3đ




1đ


Câu 2:
Nhấn F9 để dịch và sửa lỗi chương trình
2đ

Câu 3.
Nhấn Ctrl +F9 để chạy và kiểm tra chương trình
2đ