Cho mảng a gồm 10 phần tử thuộc kiểu nguyên. Viết hàm tính giá trị trung bình của mảng a
Giúp mình với mọi người ơiiii????

Question

Cho mảng a gồm 10 phần tử thuộc kiểu nguyên. Viết hàm tính giá trị trung bình của mảng a Giúp mình với mọi người ơiiii????

diemmy · Answer

program mang;

var i:longint;

a:array[1..10] of longint;

function tb:real;

begin

tb:=0;

for i:=1 to 10 do tb:=tb+a[i];

tb:=tb/10;

end;

begin

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

write(tb:10:1);readln;

end.

0 bình luận về “Cho mảng a gồm 10 phần tử thuộc kiểu nguyên. Viết hàm tính giá trị trung bình của mảng a Giúp mình với mọi người ơiiii????”