Как использовать Try, Catch и, наконец,
Мое задание состоит в том, чтобы написать программу, которая запрашивает у пользователя 10 чисел, по которым он затем найдет среднее значение, и должен включать ключевые слова Try, Catch и finally. (Разделить на ноль исключений).
Как использовать Try, Catch и Наконец?
Пока что моя программа выглядит так:
Module Module1
Public Sub Main()
Dim A, B, C, D, E, F, G, H, I, J, K, L, M As Integer
Console.WriteLine("Enter 1st Number: ")
A = Console.ReadLine()
Console.WriteLine("Enter 2nd Number: ")
B = Console.ReadLine()
Console.WriteLine("Enter 3rd Number: ")
C = Console.ReadLine()
Console.WriteLine("Enter 4th Number: ")
D = Console.ReadLine()
Console.WriteLine("Enter 5th Number: ")
E = Console.ReadLine()
Console.WriteLine("Enter 6th Number: ")
F = Console.ReadLine()
Console.WriteLine("Enter 7th Number: ")
G = Console.ReadLine()
Console.WriteLine("Enter 8th Number: ")
H = Console.ReadLine()
Console.WriteLine("Enter 9th Number: ")
I = Console.ReadLine()
Console.WriteLine("Enter 10th Number: ")
J = Console.ReadLine()
K = (A+B+C+D+E+F+G+H+I+J)
Console.WriteLine("Enter the amount of numbers to average: ")
M = Console.ReadLine()
L = K / M
Console.WriteLine("The Average Is: " & L)
Console.ReadKey()
End Sub
End Module