shakutis
06.06.2020 05:15

Всегда была проблема с паскалем. решить. спортсмен пробежал в первый день 10 км. каждый следующий день он пробежал на 10% больше вчерашнего. сколько он пробежит за n дней? я попробовала так: var a: real; i,n: integer; begin a: =10; readln(n); for i: =1 to n do begin a: =a+(a*0.1); end; write(a); end.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Karukart
14.08.2020 19:26
Var A,S:real;
n:integer;
Begin
Write('n = ');
Read(n);
a:=10;
For n:= 1 to n do
    Begin
    a:=a*1.1;
    S:=S+a
    End;
WriteLn(S)
End.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота