В первый день тренировочного цикла Катя пробегает 2 км,а каждый последующий день-в 2 раза больше,чем в предыдущий.Тренер Кати прекращает цикл,когда километраж одной тренировки превышает S.Сколько дней длится тренировочный цикл ...
В первый день тренировочного цикла Катя пробегает 2 км,а каждый последующий день-в 2 раза больше,чем в предыдущий.Тренер Кати прекращает цикл,когда километраж одной тренировки превышает S.Сколько дней длится тренировочный цикл Кати?
ПРИМЕР
Ввод:1000
Вывод:10
Использовать цикл while
Гость
Ответ(ы) на вопрос:
Гость//tren, kilom :integer
tren=0
kilom=2
while (kilom
ГостьProgram n1;
var n,i,s:real;
begin
read(s);
writeln('километраж=',s);
i:=1;
n:=0;
while i<=s do
begin
i:=i*2;
n:=n+1;
end;
writeln(n,' дн. длится тренировочный цикл Кати');
end.
Не нашли ответ?
Похожие вопросы