Начав тренировки,спортсмен в 1-ый денек пробежал 10 км. Каждый денек он

Начав тренировки,спортсмен в первый денек пробежал 10 км. Каждый день он увеличивал дневную норму на 10% нормы предшествующего денька. Какой суммарный путь пробежит спортсмен за 7 дней? Составить программку в паскале подмогою цикла repeat.

Задать свой вопрос
2 ответа
Program pr; var norma,total:real;day:integer; begin norma:=10; day:=0; repeat day:=day+1; writeln('День: ',day); writeln('Норма: ',norma:0:1,' км'); writeln(); total:=total+norma; norma:=norma*1.1; until day=7; writeln(); writeln('Всего: ',total:0:1); end.
Var
   d:integer;
   n,s:real;
begin
n:=10;
s:=10;   путь в 1-ый денек, считать будем потому со второго дня
d:=2;
repeat
    n:=n*(1+0.1);
    s:=s+n;
    d:=d+1;
    until dgt;7;
writeln(s)
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт