Kiemtra thuchanh 1 tiet hk2 2013

Trường DTNT Đạtẻh Kiểm tra 1 tiết thực hành
Lớp…………………………. Môn: Tin 8
Họ, tên học sinh……………………………….. ………Thời gian làm bài 40 phút
Điểm
Lời phê của giáo viên
Mã đề 132

ĐỀ BÀI
Viết chương trình nhập một dãy số. (2đ)
Tính :
Tổng các số trong dãy số (2 đ)
Trung bình các số trong dãy số ( tổng các số trong dãy số chia cho số các số trong dãy số) (2đ)
Lưu file chương trình tên D:KTTH_.pas (1đ )
Dịch, chạy chương trình , nhập số liệu kiểm tra (3đ)

Hướng dẫn:
Tham khảo chương trình dưới đây (thêm các từ khóa hoặc lệnh còn thiếu vào các chỗ ………. để chương trình hoàn chỉnh)
Program nhapdayso; Uses crt;
var: …… , …. , sum : integer;
TB: real;
A:……….[1..100] of integer;
BEGIN
Clrscr;
Write(‘nhap so luong cac phan tu trong day so: ’); readln(n);
………. i:=1 to n do ………
Write(‘ nhap gia tri phan tu thu ‘ , I , ‘A[‘, I , ‘] = ’); readln(A[i]); sum:=sum+A[i];
………………;
TB:=sum/n
Writeln(‘tong cactrong day so : ’, ……..);
Writeln(‘Trung binh cac so trong day so : ’, ………:5:3);
Readln
END.
Sau khi viết xong ( dịch chương trình, sửa lỗi nếu có
Chạy chương trình nhập số liệu để kiểm tra kết quả thực tế và ghi vào bảng sau
n
A[1]
A[2]
A[3]
A[4]
A[5]
A[6]
SUM
TB

6
??????
??????
??????
??????
??????
??????
??????
??????

Lưu lại sự thay đổi