Информатика Задача. Спортсмен приступает к тренировкам по следующему графику: в первый день он должен пробежать 10 км; каждый следующий день следует увеличивать дистанцию на 10% от нормы предыдущего дня. Как только дневная норма достигнет или превысит 25 км, необходимо прекратить её увеличение и далее пробегать ежедневно ровно 25 км. Начиная с какого дня, спортсмен будет пробегать 25 км?
Нужно написать второй вариант программы
Вариант 1
program sportsmen;
var a:integer; x:real;
begin
writeln('График тренировок');
a:=1;
x:=10;
repeat
a:=a+1;
x:=x+0.1*x;
until x>=25;
writeln ('Начиная с ', a, '–го дня спортсмен будет пробегать 25 км')
end.
Вариант 2 - ?
я в 6 классе
Объяснение:
100% - 25 км
10 км - 25% от меня все.
program sportsmen;
var a: integer; x: real;
begin
writeln('График тренировок');
a := 1;
x := 10;
while x < 25 do
begin
a := a + 1;
x := x + 0.1 * x;
end;
writeln('Начиная с ', a, '-го дня спортсмен будет пробегать 25 км');
end.
Обоснование решения:
1. Объявляем переменные a и x, где a - счетчик дней, x - текущая дистанция.
2. Инициализируем переменные: a = 1 и x = 10, так как спортсмен должен пробежать 10 км в первый день тренировок.
3. Выводим сообщение "График тренировок".
4. Запускаем цикл while, в котором проверяем условие x < 25.
5. Внутри цикла увеличиваем счетчик дней a на 1 и увеличиваем текущую дистанцию x на 10% от предыдущей дистанции (0.1 * x).
6. Цикл будет выполняться до тех пор, пока текущая дистанция x не достигнет или превысит 25 км.
7. Когда условие x < 25 становится ложным, выводим сообщение "Начиная с (значение a) -го дня спортсмен будет пробегать 25 км".
8. Конец программы.
Результат выполнения программы будет аналогичен варианту 1: программная реализация в относительно простой форме позволяет убедиться в том, что спортсмен начнет пробегать 25 км начиная с 19-го дня.