Hãy nêu ý nghĩa của các câu lệnh trong chương trình sau:
var a, Thunhap_TB: real; i: Integer;
begin
Thunhap_TB:= 0;
for i:=1 to 50 do
begin
write('Thu nhap của gai 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 của gai dinh thu',i);
readln(a);
writeln('Do lech so voi thu nhap TB la:',a-Thunhap_TB)
end;
end.
Loga
Sinh Học lớp 12
