ХЕЛП!!!!!! вычислить квадратный корень из суммы квадратов четных элементов в визуал-бейсике.

ХЕЛП!!!!!! вычислить квадратный корень из суммы квадратов четных элементов в визуал-бейсике.
Гость
Ответ(ы) на вопрос:
Гость
Sub Main()         Dim a(10) As Integer         Dim c As Integer         Dim R As Random = New Random(100)         For i As Integer = 0 To 10             a(i) = R.Next(10)             Console.WriteLine("[" + i.ToString() + "] => " + a(i).ToString())         Next         For i As Integer = 0 To 10             If (a(i) Mod 2 = 0) Then                 c = c + a(i) ^ 2             End If         Next         Console.WriteLine(Math.Sqrt(c))         Console.Read()     End Sub На .NET'oвском =)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы