Ответ(ы) на вопрос:
Гостьvar x,z,i: real;
begin
i:=0;
z:=1;
x:=39;
while i < 4 do
begin
z:=(z+x/2)/2;
i:=i+1;
end;
writeln('z: ',z);
end.
_______________________
ОТВЕТ: 18.34375 (ОКРУГЛИ, до нужного знака)
_______________________
Не нашли ответ?
Похожие вопросы