Оптимизировать код, содержащий вложенные циклы - Visual Basic .NET

Формулировка задачи:

Вот код :

Dim a As Long
        Do
            a += 1
            Console.WriteLine(a)
m1:         If a <> 10000 Then
                Do
                    a -= 1
                    Console.WriteLine(a)
                    If a = 0 Then
                        Do
                            a += 1
                            Console.WriteLine(a)
 
                            If a = 10000 Then
                                Do
                                    a += 1
                                    Console.WriteLine(a)
                                    GoTo m1
                                Loop
                            End If
 
                        Loop
                    End If
                Loop
            End If
                Loop

Решение задачи: «Оптимизировать код, содержащий вложенные циклы»

textual
                            Листинг программы 
                        

                            m1: for a=1 to 10000: Console.WriteLine(a): Next a
for a=10000 to 1 step -1: Console.WriteLine(a): Next a
goto m1
                        

Оцени полезность:

9 голосов , оценка 3.778 из 5

Похожие ответы