12.04.2010, 19:10
|
|
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
С нами:
8850305
Репутация:
259
|
|
Сообщение от 7on
помогите решить систему в VB 6
{ V+sin*V; V<-1
U={arcsin(0.7*V+0.26); -1<=V<=0.5
{ (V+(cos*V+(e^V)^0.5; 0.5<V
Пользуйся! 
PHP код:
Private Sub Command1_Click()
v=val(textbox1.text)
e= 2.718
select case true
case v<-1
u=v+sin(v)
case v>=-1 and v<=0.5
u=arcsin(0.7*v+0.26)
case v>0.5
u=v+(cos(v)+(e^v)^0.5)
end select
msgbox("U= "+u)
end sub
2 X-FRITS щас посмотрю что можно сделать
|
|
|