Kiểu dữ liệu có cấu trúc

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

Nhập dãy B gồm N số nguyên (N<=50). Tìm giá trị trung bình của dãy.

(Pc mn nhé)

Nguyễn Lê Phước Thịnh
4 tháng 11 2020 lúc 21:54

uses crt;

var b:array[1..50]of integer;

i,n,t:integer;

begin

clrscr;

write('Nhap n='); readln(n);

for i:=1 to n do

begin

write('B[',i,']='); readln(b[i]);

end;

t:=0;

for i:=1 to n do

t:=t+b[i];

writeln('Gia tri trung binh cua day la: ',t/n:4:2);

readln;

end.


Các câu hỏi tương tự
Nguyễn Toàn
Xem chi tiết
Phạm Việt Bách
Xem chi tiết
Dương Chí Tôn
Xem chi tiết
Thi Đua Khen Thưởng
Xem chi tiết
pham thuy vy
Xem chi tiết
Gia Bảo Huỳnh
Xem chi tiết
Trùm Trường
Xem chi tiết
Đoàn Thị Thu Hà
Xem chi tiết
Nguyễn Quyết Chiến
Xem chi tiết
Nguyễn Thị Thanh Thúy
Xem chi tiết