Написать программу для решения следующей задачки: учебным заведением был приобретен стол

Написать программку для решения последующей задачки: учебным заведением был приобретен стол за S руб. Его амортизация составляет 12% в год. Найти, сколько он будет стоить через N лет. (Pascal) Пример: Введите цена стола : 35000 Введите кол-во лет : 5 Цена стола на конец 1 года :30800.000рублей Стоимость стола на конец 2 года :27104.000рублей Стоимость стола на конец 3 года :23851.520рублей Цена стола на конец 4 года :20989.338рублей Цена стола на конец 5 года :18470.617рублей

Задать свой вопрос
1 ответ
var stoimost, i : integer;
Stoimoststola, a : real;
begin
writeln(Введите цена стола:);
readln(Stoimoststola);
writeln(Введите количество лет:);
readln(years);
s:=0;
for i:=1 to years do
begin
a:=Stoimoststola*0.12;
a:=Stoimoststola-a;
Stoimoststola:=a;
Writeln(Стоимость стола на конец , i, года , a, рублей);
end;
end.
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт