Решите в Pascal! СРОЧНО! Какую начальную сумму надобно положить в банк,

Решите в Pascal! Безотлагательно!
Какую исходную сумму надо положить в банк, чтоб через 50 лет на счёту было 1.000.000 , если процентная ставка 5 % в год.

Задать свой вопрос
Юра
Это можно и на листочку решить
Vahromceva Inna
Ещё надо?
Егор Шабелев
да
Иван Макинко
А не забей я теснее решил
Andrej Ganzhelo
Мне посто интерестно есть ли какие-то данные для ввода
Данил Чаплинский
Какие?
Sofja Milikbekova
Забиваешь процент
Женек Палаткин
и исходную сумму
Борисевич Анастасия
и считаешь
Николай
А ок
1 ответ
 var k,p,d:real;i:integer;begin
 write('Write kol:');readln(k);
 write('Write percent:');readln(p);
 for i:=1 to 50 do
  d:=k/(1+(p/100)*i);
 writeln(d:0:2);
end.

Код может быть неточен так как нет данных для проверки.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт