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.
Loga
Sinh Học lớp 12
