Design and develop a simple application system that computes the Depreciation Cost of Item (D) takes as input the purchase. Price of an Item (P) its expected number of year of service (S) and yearly Depreciation of the Item (Y)
Module Module1
Sub Main()
Console.Write("Enter price of an Item (P): ")
Dim P As Double = Double.Parse(Console.ReadLine())
Console.Write("Enter expected number of year of service (S): ")
Dim S As Integer = Integer.Parse(Console.ReadLine())
Console.Write("Enter yearly Depreciation of the Item (Y): ")
Dim Y As Double = Double.Parse(Console.ReadLine())
Dim D As Double = (P - Y) / S
Console.WriteLine("The depreciation cost of Item (D): " + D.ToString())
Console.ReadLine()
End Sub
End Module
Comments
Leave a comment