Bukavan
5 год назад
Составить программу на языке Паскаль.
Спортсмен в первый день пробежал 10 км. Каждый следующий день он увеличивал дневную норму на 10% от нормы предыдущего дня. Через сколько дней спортсмен будет пробегать более 20 км в день?
ОТВЕТЫ
Осип
Aug 11, 2019
Var s:real; n:integer;
begin
s:=10;
n:=1;
while slt;20 do
begin
s:=s*1.1;
n:=n+1;
end;
writeln( n = ,n);
end.
Результат:
n = 9
begin
s:=10;
n:=1;
while slt;20 do
begin
s:=s*1.1;
n:=n+1;
end;
writeln( n = ,n);
end.
Результат:
n = 9
108
Смежные вопросы:
