Thosida
5 год назад
Напишите код по этой схеме в паскале,пожалуйста)
ОТВЕТЫ
Иосиф
Oct 24, 2020
var i:integer; x:real;
begin
i:=1;
x:=10;
repeat
i:=i+1;
x:=x+0.1*x;
until x>=25;
writeln(i);
end.
Результат:
11
begin
i:=1;
x:=10;
repeat
i:=i+1;
x:=x+0.1*x;
until x>=25;
writeln(i);
end.
Результат:
11
423
Смежные вопросы:
