Вы обязаны другу 4000 рублей. Он предлагает выплатить ему долг последующим

Вы обязаны другу 4000 рублей. Он предлагает выплатить ему долг следующим образом: в первую неделю- 1 руб, во вторую- 2 руб, в третью- 4 руб, в четвёртую 8 руб и т.д. в течении 12 недель. Прибыльно ли для вас такое предложение. Какую сумму вы выплатите таким методом.

Задача из Паскаля. Помогите плз.

Задать свой вопрос
Ярослава Кознова
нет не прибыльно
Цитоловская Ангелина
28665 руб
Oksana Purynova
Как считали???
Виктор Шпоть
не так
Светлана Рекрут
я понял где накосячил
1 ответ
Var
   S,A:integer;
   n:byte;
Begin
S:=0;
A:=1;
For n:= 1 to 12 do
    Begin
    S:=S+A;
    A:=A*2
    End;
WriteLn('Сумма выплаты составит: ',S);
End.



Итог работы программки:

Сумма выплаты составит: 4095
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт