Tin học Viết chương trình tính mức thu nhập trung bình của các hộ gia đình trong địa phương 16/07/2021 By Kinsley Viết chương trình tính mức thu nhập trung bình của các hộ gia đình trong địa phương
uses crt; var a: array[1..1000] of integer; i,n: integer; tb: real; begin clrscr; write (‘nhap so ho dan: ‘); readln (n); for i:=1 to n do begin write (‘nhap thu nhap cua ho dan thu ‘,i,’: ‘); readln (a[i]); tb:=tb+a[i]; end; tb:=tb/n; writeln (‘thu nhap trung binh la: ‘,tb:1:3); readln; end. Trả lời