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

AT

Viết CT sử dụng biến mảng để tính giá trị trung bình của n số nguyên được nhập từ bàn phím.

LH
27 tháng 3 2018 lúc 20:12

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

n,i,tb: longint;

begin

read(n);

for i:=1 to n do read(a[i]);

s:=0;

for i:=1 to n do s:=s+i;

tb:=0;

tb:= s mod n;

write(tb);

end.

Bình luận (2)

Các câu hỏi tương tự
UO
Xem chi tiết
HT
Xem chi tiết
DC
Xem chi tiết
NN
Xem chi tiết
H24
Xem chi tiết
BV
Xem chi tiết
MD
Xem chi tiết
HT
Xem chi tiết
TD
Xem chi tiết