Вычисление суммы всех двузначных чисел - VB

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

Составьте программу вычисления суммы всех двузначных чисел незнаю как дальше быть

                    Листинг программы
                
Private Sub Command1_Click()  
    Randomize 
    MsgBox Int(10 * Rnd+99)  
    End Sub

Решение задачи: «Вычисление суммы всех двузначных чисел»

textual
                            Листинг программы 
                        
 
                        
                          
                    
Function Sum2(Optional n as integer =10) As Integer
    if n = 99 then
       Sum2=99
    else
      Sum2=n+Sum2(n+1)
    end if
End Function

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

7 голосов , оценка 3.429 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

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