Для тренировки определите без компьютера,
Для тренировки определите без компьютера, что напечатает следующий фрагмент:
a = 9
For i = 1 To 6
If i * i = a Then
For k = 5 To 6
Debug.Write(k)
If 3 > 2 Then a = 16
Next k
Else
Debug.WriteLine(2004)
End If
Next i
Здесь внутрь For i вложен If i*i=a , внутрь которого вложен For k, внутрь которого в свою очередь вложен If 3>2. Обратите внимание на различную величину отступов от левого края листа.
Ответ:
2004
2004
56562004
2004
