Bài 11: Kiểu mảng

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

Nhập điểm kiểm tra học kì môn toán của n bạn học sinh. Tính điểm trung bình cộng và in kết quả ra màn hình.

Bùi Anh Tuấn
17 tháng 3 2021 lúc 20:14

Nguyễn Lê Phước Thịnh
17 tháng 3 2021 lúc 21:49

uses crt;

var a:array[1..100]of integer;

i,n,tb:integer;

begin

clrscr;

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

for i:=1 to n do 

 begin

write('A[',i,']='); readln(a[i]);

end;

tb:=0;

i:=1;

while i<=n do 

  begin

tb:=tb+a[i];

inc(i);

end;

writeln(tb/n:4:2);

readln;

end.


Các câu hỏi tương tự
Bàn Chàn Khuân
Xem chi tiết
Bùi Thị Phương Nga
Xem chi tiết
Võ Thu Hằng
Xem chi tiết
Thảo Nguyễn
Xem chi tiết
Nhảy chân sáo mà từ từ đ...
Xem chi tiết
Vo Thi Kim Mỹy
Xem chi tiết
Trần Văn Việt Hùng
Xem chi tiết
le manh vu
Xem chi tiết
Mai Thành Vinh
Xem chi tiết