Форумы на Хакер

Добро пожаловать! Это — архивная версия форумов на «Хакер.Ru». Она работает в режиме read-only.

Программирование циклов, управляемых условием. VB 2008 .NET

Пользователи, просматривающие топик: none

Зашли как: Guest

Все форумы >> [Компилируемые языки] >> Программирование циклов, управляемых условием. VB 2008 .NET

Имя

Сообщение

<< Старые топики Новые топики >>

Программирование циклов, управляемых условием. VB 2008 .NET - 2011-01-16 16:11:12.980000

Alex0161

Сообщений: 2
Оценки: 0
Присоединился: 2010-12-27 21:13:30.380000

Вычислить с точностью Е=0.5 значение функции
y= √(3+√(6+√(9+⋯)) )

Програмный код

 Public Sub rr(ByRef s As Single)
         Dim u, p As Double
         Dim i As Integer = 1
         Dim n As Integer = 0
         ek = CSng(InputBox("Введите точность е"))
         p = 1
         Do While Math.Abs(p - u) &gt; e
             p = u
             u = Pow(3 * i, (1 / (2 * i)))
             sk += CSng(u)
             i += 1
         Loop
     End Sub

правильна формула под u=????

Post #: 1

Страниц: [1]

Все форумы >> [Компилируемые языки] >> Программирование циклов, управляемых условием. VB 2008 .NET

Связаться:
Вопросы по сайту / xakep@glc.ru

Предупреждение: использование полученных знаний в противозаконных целях преследуется по закону.