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

DS

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)

AW
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ỏ

Bình luận (1)

Các câu hỏi tương tự
TA
Xem chi tiết
NT
Xem chi tiết
TA
Xem chi tiết
LQ
Xem chi tiết
NT
Xem chi tiết
YN
Xem chi tiết
TN
Xem chi tiết
CN
Xem chi tiết
TN
Xem chi tiết