Написать программу в vba (visual basic) 1)напиши программу, выводящую на экран степени числа 3 в интервале от а до b включительно (а и b пользователем). 2)найти все делители числа 1204. большое

1nVictUS 1nVictUS    2   28.05.2019 15:30    5

Ответы
БлэккКээт БлэккКээт  01.10.2020 13:34
        '     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)
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика