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

+ 0 -

Maniloun

31 янв. 2014 г., 6:14:55 (10 лет назад)

var a,n:integer;
b,c:real;
begin
c:=10;
a:=1;
b:=c;
writeln('Введите количество дней');
readln(n);
repeat
c:=c*(1.1);
a:=a+1;
b:=b+c;
until (a>(n-1));
writeln('Суммарный путь равняется ',b,' км');
end.

+ 0 -

Tony96

31 янв. 2014 г., 7:58:36 (10 лет назад)

const
    bdistance = 10;
    percent = 0.1;
var i,n:integer;
    s,d:real;
begin

    writeln('Введите количество дней');
    readln(n);

    s:= bdistance;
    d:=bdistance;
    for i := 2 to n do begin
        d := d * (1 + percent);
        s := s + d;
    end;
    
    writeln('Суммарный путь равняется ',s,' км');
end.