Evaluar la función Y=8X^(3/5)-3X^3+6X^2-7 cuando el valor de x es ingresado por teclado.
' Gambas class file
PUBLIC SUB _new()
END
PUBLIC SUB Form_Open()
END
PUBLIC SUB Button1_Click()
Textbox2.text=(-8)*(Textbox1.text)^(3/5)-(3)*(Textbox1.text)^(3)+(6)*(Textbox1.text)^2-(7)
END
PUBLIC SUB Button2_Click()
Textbox1.text = ""
Textbox2.text = ""
END
PUBLIC SUB Button3_Click()
QUIT
END
END
PUBLIC SUB Button1_Click()
Textbox2.text=(-8)*(Textbox1.text)^(3/5)-(3)*(Textbox1.text)^(3)+(6)*(Textbox1.text)^2-(7)
END
PUBLIC SUB Button2_Click()
Textbox1.text = ""
Textbox2.text = ""
END
PUBLIC SUB Button3_Click()
QUIT
END
No hay comentarios:
Publicar un comentario