Предмет: Информатика,
автор: artemgoshhenko
Напишите пожалуйста в Паскале.
В первый день спортсмен пробежал X километров. В каждый последующий день он увеличивал пробег на 15% от предыдущего дня. По данному числу Y требуется определить номер дня, в который пробег спортсмена составил не менее Y километров.
Ответы
Автор ответа:
1
program raf105;
var x,y,day:real;
begin
write('Сколько спортсмен пробежал в первый день (X): ');
readln(x);
write('Сколько километров он хочет пробежать за день (Y): ');
readln(y);
day:=1;
while x<y do
begin
x:= x+x/100*15;
day:= day+1;
end;
writeln('Спортсмен выполнит цель за ',day,' дн. тренировок');
end.
Программа написана на языке PascalABC
Похожие вопросы
Предмет: Другие предметы,
автор: altunarlan14
Предмет: Физкультура и спорт,
автор: vladlena13331
Предмет: Другие предметы,
автор: usmonovsohzahon79
Предмет: Математика,
автор: ainur19851
Предмет: Математика,
автор: оля303