Сайт покботняебучая ничего не работает

Объяснение:

1) Расположите фамилии ученых, занимавшихся изучением системы Мира, в порядке их появления:

А) Клавдий Птолемей;

Г) Николай Коперник;

В) Джордано Бруно;

Б) Иоганн Кеплер;

Е) Галилео Галилей;

Д) Исaак Ньютон;  

2) Из вышеперечисленных ученых выберите тех, кто открыл и доказал Законы движения небесных тел.

Б) Иоганн Кеплер;

Д) Исaак Ньютон;  

3) Известно, что орбита любой планеты представляет собой эллипс, в одном из фокусов которого находится Солнце. Ближайшая к Солнцу точка орбиты называется:

Г) перигелий;

4) Отклонение небесного тела от эллиптической траектории называется:

B) возмущение

5) Без какого из следующих утверждений немыслима гелиоцентрическая система?

С) Планеты обращаются вокруг Солнца

6) Все утверждения, за исключением одного, характеризуют геоцентрическую систему мира. Укажите исключение:

Д) Луна движется вокруг Солнца

7) Массу планет можно определить:

С) по третьему закону Кеплера

8) Что определяет второй закон Кеплера?

А) радиус-вектор планеты за равные промежутки времени описывает равные площади;

   '     1)Напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b задаются пользователем).    
    
Dim a As Integer
Dim b As Integer  
Dim i As Integer    

a = InputBox("Введите а") 
b = InputBox("Введите b")
   
Dim msg As String      
msg = ""   
     
For i = a To b     
       msg = msg &  3 в степени " & i & " равно " & 3 ^ i & vbCrLf    
 Next    

MsgBox(msg)

2)Найти все делители числа 1204.   

Dim i As Integer       
Dim msg As String   
msg = ""      

For i = 1 To 1204  
          If 1204 Mod i = 0 Then      
                  msg = msg & "Число " & i & " является делителем 1204." & vbCrLf                  End If    
Next 
  MsgBox(msg)