НАДО СРОЧНО РЕШИТЬ ДАННУЮ ЗАДАЧУ В ФОТО

Приложения:

Ответы

Ответ дал: multibillions10kk
0

Ответ:

var i: integer;

var x: real;

begin

i:=1;

x:=10;

while (x < 25) do

begin

i:=i+1;

x:=x + 0.1 * x;

end;

writeln(i)

end.


sashahaval: а как мне это в тетрадь писать???
Вас заинтересует