Техническая механика , надо решить только с p2 =20 кн​

Гуманизм и Реформация связаны с тем, что гуманисты поставили под сомнения церковный авторитет и церковную схоластику. Под влиянием идей гуманистов шёл процесс обмирщения сознания: человек стал думать не только о божественном, не только о загробном мире — его мысли обратились и к земной, мирской жизни. В человеке проснулась жажда познания, активной деятельности. Строгое соблюдение прежних церковных обрядов и таинств, посещение служб на незнакомом большинству латинском языке не удовлетворяло многих верующих и толкало их к поиску другой церкви, более простой и искренней, которая больше отвечала потребностям человека Нового времени.

   '     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)