Помогите пожалуйста если не все хотя бы 3 номер, 4 ненадо
Помогите пожалуйста если не все хотя бы 3 номер, 4 ненадо
Гость
Ответ(ы) на вопрос:
Гостьvar x:real;
i:integer;
begin
i:=1; x:=10;
repeat
i:=i+1;
x:=x+ 0.1*x;
until x>=25;
writeln(i);
end.
Не нашли ответ?
Похожие вопросы