ẹieồm Lụứi pheõ cuỷa coõ giaựoViết chơng trình sử dụng biến mảng để tính giá trị trung bình của tổng N số nguyên đợc nhập vào từ bàn phím.. Nhập chương trỡnh 2đ 2.. Trong chương trỡnh c
Trang 1ẹieồm Lụứi pheõ cuỷa coõ giaựo
Viết chơng trình sử dụng biến mảng để tính giá trị trung bình của tổng N số
nguyên đợc nhập vào từ bàn phím.
Program bien- mang;
Uses crt;
Var N, i: integer;
TB: real;
A: array[1 100] of real;
Begin
Clrscr;
write(’Nhap so phan tu cua mang, n= ’); read(100);
for i:=1 to n do
begin
write(’Nhap gia tri ’,i,’cua mang, a[’,i,’]= ’);
readln(a[1]);
end
TB:=0;
for i:=1 to n do TB:=TB+a[i];
TB:=TB/a;
write(’Trung binh bang ’,TB);
End.
1 Nhập chương trỡnh (2đ)
2 Trong chương trỡnh cú 6 lỗi, em hóy sửa lại cỏc lỗi (mỗi lỗi sửa đỳng 1 đ).
3 Trỡnh bày chương cho đẹp và phự hợp (1đ)
4 Lưu bài: tờn_somay_ổ đĩa (1đ)
Trửụứng THCS Lyự Tửù Troùng
Lụựp:
Teõn:
KIEÅM TRA MOÄT TIEÁT (TH) Naờm hoùc: 2009 - 2010 Moõn Tin hoùc lụựp 8 Thụứi gian: 45 phuựt