program rastirostok;
var h: double; //в этой переменной храним высоту
var i: integer; // это для счетчика дней
var s: string;
begin
i : = 0;
h: =0.5;
while(h< =32) do
begin
h: = h + 0.4*h;
i: = i+1;
writeln(h: 15: 2);
end;
str(i,s);
writeln('количество дней: '+s);
str(h: 15: 2,s);
writeln('высота ростка: '+s);
end.
в итоге успеет за 13 дней вырасти
расклад по дням и итог
0.70 0.98 1.37 1.92 2.69 3.76 5.27 7.38 10.33 14.46 20.25 28.35 39.69 количество дней: 13 высота ростка: 39.69Поделитесь своими знаниями, ответьте на вопрос: