Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - Общий форум

Страница: 1 |

 

  Вопрос: Решить простую алгоритмическую задачу Добавлено: 13.08.06 23:14  

Автор вопроса:  DJ EFFECT
Решить простую алгоритмическую задачу: Дано цело число N>0.Найти значение выражения 1,1-1,2+1,3-...(N слагаемых, знаки чередуются).Условный оператор не использовать.

Ответить

  Ответы Всего ответов: 8  

Номер ответа: 1
Автор ответа:
 VβÐUηìt



Вопросов: 246
Ответов: 3333
 Web-сайт: смекаешь.рф
 Профиль | | #1
Добавлено: 14.08.06 11:43
ЦЫКЛОМ

Ответить

Номер ответа: 2
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #2 Добавлено: 15.08.06 17:29
2 VBD Ну понятно что не на Script Control'e ))
Вапщето без условного Аператара чёто неполуццаетца )

Ответить

Номер ответа: 3
Автор ответа:
 AndreyMp



ICQ: 237822510 

Вопросов: 28
Ответов: 1182
 Профиль | | #3 Добавлено: 15.08.06 17:45
значение=-0.1*N/2
Ну или примерно так.

Ответить

Номер ответа: 4
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #4
Добавлено: 15.08.06 19:56
Если N - четное, то -0.1*N/2, а если нечетное, то 1.1+0.1*N/2. Значит, выражение без условного оператора выглядит вроде бы так:
res = (1-(-1)^N)/2 * 1.1 + -(-1)^N*N/20

Ответить

Номер ответа: 5
Автор ответа:
 HACKER


 

Разработчик Offline Client

Вопросов: 236
Ответов: 8362
 Профиль | | #5 Добавлено: 15.08.06 21:48
хм краслон, да ты действительно талантлив!

Ответить

Номер ответа: 6
Автор ответа:
 -АлександР-



Вопросов: 55
Ответов: 1008
 Web-сайт: sham.clan.su
 Профиль | | #6
Добавлено: 15.08.06 22:23
Mда, а у меня получаестя циклом - только в уме. Код почему-то не работает
Option Explicit
Private Function nN(n As Integer) As Single
        Dim i, t, s As Single
        t = 1 + n * 0.1
        nN = 0
        s = 0.1
        For i = 1.1 To t Step s
            nN = nN + i
            i = -i
            t = -t
            s = -s
        Next i
End Function

VB6 от него виснет и выключается, вроде простой алгоритм. Отчегго виснуть?
.........................

Ответить

Номер ответа: 7
Автор ответа:
 shuffle



Администратор

ICQ: 201502381 

Вопросов: 15
Ответов: 737
 Профиль | | #7 Добавлено: 15.08.06 22:59
Так ведь... http://vbnet.ru/forum/show.aspx?id=116266&tolastpage=true

Ответить

Номер ответа: 8
Автор ответа:
 -АлександР-



Вопросов: 55
Ответов: 1008
 Web-сайт: sham.clan.su
 Профиль | | #8
Добавлено: 16.08.06 00:09
Ну VBD сказал
ЦЫКЛОМ
Вот я и сделал "цыклом"...)))

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам