giải thích tác dụng của các câu lệnh sau: var a,thunhap_tb:real;i:integer; begin thunhap_tb:=0; for i:=1 to 50 do begin write(‘thu nhap cua gia dinh t
giải thích tác dụng của các câu lệnh sau: var a,thunhap_tb:real;i:integer; begin thunhap_tb:=0; for i:=1 to 50 do begin write(‘thu nhap cua gia dinh thu’,i); readln(a); thunhap_tb:=thunhap_tb+a end; thunhap_tb := thunhap_tb/50; for i:=1 to 50 do begin write(‘ thu nhap cua gia dinh thu’,i);readln(a); writeln(‘do lech so voi thu nhap trung binh la:’,a-thunhap_tb) end; end.