Математическое задание на VB

[Guest]

Я, наверное, типичная представительница рода блондинок, которые не могут разобраться ни в чем серьезном
Помогите сделать задание, если это не слишком тяжело для вас:
Необходимо сделать форму с полем ввода, через которое можно будет ввести число Х. После нажатия на кнопку "Расчет", вычислить значение функции Y. Значение Y зависить от того, к какому дипапзону принадлежит значение X
link removed
Мне бы хоть математическую функцию перевести на VB, уже буду рада

 

[????]

А что есть I при 5<Х<=15 и при X > 15???
может я тоже представитель рода блондинок если не могу понять что это

 

[Guest_N1k1tung]

Создай соответствующие переменные, а вобработчике нажатия кнопки напиши
X = Val(Text1.Text) 'Text1 - поле ввода
If X > 5 Then
Y = X*2 + 5 - 41 'e.t.c(пиши любую формулу)
'...
Else
Y = X^5- 256 'e.t.c(пиши любую формулу)
EndIF

 

[Guest]

<!--QuoteBegin-Оленька+29:04:2004, 04:26 -->
<span class="vbquote">(Оленька @ 29:04:2004, 04:26 )</span><!--QuoteEBegin-->Я, наверное, типичная представительница рода блондинок, которые не могут разобраться ни в чем серьезном
Помогите сделать задание, если это не слишком тяжело для вас:
Необходимо сделать форму с полем ввода, через которое можно будет ввести число Х. После нажатия на кнопку "Расчет", вычислить значение функции Y. Значение Y зависить от того, к какому дипапзону принадлежит значение X
link removed
Мне бы хоть математическую функцию перевести на VB, уже буду рада[/quote]
Формула суммы [a;b] : (a+*(b-a+1)/2.
Для произведения - аналитической целочисленной формулы нет.

if x < 5 then
y = x*x / 5
elif x < 15 then
y = 1
for i=6 to x
 y = y*i
next
y = y+25
else
y = (x+16)*(x-15)
endif

 

[Guest]

5tertretretretretretttttttttttttttttttttttttttttttttttteeeeeeeeeeeeeeeeeeetttttt
ttttttttttttteeeeeeeeeeeeeeeeeeeeeeeeertttttttttttttttttttttttttttttttt

 

[Dico]

Чтож ты стала программистом если не х.. в этом не понимаеш!
[CTRL+X]

Уважаемый, будте сдержанней.