Мне нужно отобразить год и значение, которое он потерял в этом году - PullRequest
Новая
       19

Мне нужно отобразить год и значение, которое он потерял в этом году

0 голосов
/ 18 апреля 2020

Мне нужна ваша помощь с моим визуальным кодом c. Мне нужно отобразить двойную амортизацию продукта. Каждый год продукт будет терять ценность. Мне нужно отобразить год и значение, которое он потерял в этом конкретном году, используя Visual Basi c

. У меня есть интерфейс с кодом, но когда я запускаю код, я получаю неправильный вывод. Например: стоимость продукта составляет 5000 рублей. Срок полезного использования составляет 5 лет, когда я применяю формулу к задаче. Ответ должен быть следующим: 1 должно быть 2000, 2 должно быть 1200 3, должно быть 720 4, должно быть 432 5, должно быть 259,20

С моим кодом я получаю правильный год 1, но годы 2 - 5 имеют тот же ответ, что и год 1.

Я использовал для l oop, чтобы сделать вычисления, но, похоже, застрял на год 1.

Буду признателен за любую помощь, так как я совершенно новичок в программировании. 

Calculating the Depreciation
Sub Calculations()
For yr As Integer = 1 To Life
If yr <= Life Then
Depreciation = (2 / Life) * Cost
lstBalances.Items.Add(yr & " " & Depreciation)
End If
Next
End Sub

1 Ответ

1 голос
/ 18 апреля 2020

Вы не корректируете стоимость для следующего расчета. Также ваша линия If yr <= Life Then является избыточной. Область действия l oop уже определена в контексте For / Next, а yr всегда будет меньше или равен Life. 

Sub Calculations()
   For yr As Integer = 1 To Life
      Depreciation = (2 / Life) * Cost
      lstBalances.Items.Add(yr & " " & Depreciation)
      Cost = Cost - Depreciation
   Next
End Sub
...