Написать программу на паскале. начав тренировки, спортсмен в первый день пробежал 10 км. каждый следующий день он увеличивал пробег на 10% от пробега предыдущего. определите в какой день он пробежит больше 20км, и в какой день суммарный пробег за все дни превысит 100км

207

248

Посмотреть ответы 2

Ответы на вопрос:

Полина2684

Информатика

4,7(41 оценок)

Program abc; var a,b,i: real; begin a: =10; // 10 км за день b: =1; // счетчик дней repeat a: =a+a*0.1; // +10% от пробега предыдущего b: =b+1; // счетчик дней until a> 20; //суммарный пробег за все дни превысит 20км writeln ('пробег превысил 20км. на день № ',b); repeat a: =a+a*0.1; // +10% от пробега предыдущего b: =b+1; // счетчик дней until a> 100; //суммарный пробег за все дни превысит 100км writeln ('пробег превысил 100км. на день № ',b); end.