Bài 9. Làm việc với dãy số

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hoàng Phương Uyên Phạm

Viết chương trình nhập vào dãy số gồm n số nguyên và in ra màn hình Trung bình cộng các số có trong mảng

Kiều Vũ Linh
11 tháng 5 2022 lúc 18:36

Var a:array[1..200] of integer;

i,n,s:integer;

tbc:real;

Begin

Write('Nhap so luong so n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

s:=s+a[i];

End;

tbc:=s/n;

Write('Trung binh cong la ',tbc:10:2);

Readln;

End.


Các câu hỏi tương tự
jennierubyjane
Xem chi tiết
Hiền Nguyễn
Xem chi tiết
Huỳnh Trúc Ly
Xem chi tiết
Uchiha Obito
Xem chi tiết
Nguyễn Thị Diễm Hạnh
Xem chi tiết
Ánh sao
Xem chi tiết
Nguyễn Hưng
Xem chi tiết
Uchiha Obito
Xem chi tiết
Nguyenthanh
Xem chi tiết