Bài 8. Lặp với số lần chưa biết trước

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Đờ Soo

Giả sử điểm thi môn học của một lớp có n học sinh được cho bởi n biến số thực A1,A2,A3,....,An trong đó i=1,2,3,..,n.Hãy tính điểm trung bình môn tin học của cả lớp đó(viết CT bằng ngôn ngữ lập trình pascal)

Alexander William
14 tháng 3 2017 lúc 11:38

uses crt;

var

a:array[1..50] of integer;

i,n,tong:integer;

begin

write('So hoc sinh trong lop: ');readln(n);

for i:=1 to n do

begin

write('Diem kiem tra cua ban thu ',i,' la: ');readln(a[i]);

tong:=tong+a[i]

end;

b:=tong/n

write('Diem trung binh tin hoc cua ca lop la: ',b:2:1);

readln;

end.

CT này mình chưa test nên có thể có 1 số loại nhỏ


Các câu hỏi tương tự
Tùng anh
Xem chi tiết
Nguyễn Kim Trí
Xem chi tiết
Tùng anh
Xem chi tiết
Lê Nguyễn Thanh Quân
Xem chi tiết
NGUYỄN LÊ XUÂN THỊNH
Xem chi tiết
Ý Nhi
Xem chi tiết
Trí Nguyễn
Xem chi tiết
Chira Nguyên
Xem chi tiết
Trần Thị Mai Ngọc
Xem chi tiết