hello. i have write this code below on gambas 3.9.2 and when i run that, he
indique syntaxe error
Function calcul_coefficients(x As Integer, y As Integer, degre As Integer) As
Float
'Dim ak As Float
Dim a As Float
Dim b As Float
Dim c As Float
Dim nbr_coef As Integer
Dim k As Integer
nbr_coef = degre + 1
For k = 0 To degre
If k == 0
'ak = (nbr_coef ^ k * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k -
1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
c = (nbr_coef ^ k * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k -
1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
Else If k == 1
b = ((nbr_coef ^ k) * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k
- 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
Else If k == 2
a = ((nbr_coef ^ k) * ((x ^ (2(1 / (k + 1)))) * y) - (x * (y * (x ^ (- (k
- 1)))))) / ((nbr_coef * x ^ 2) - ((x) ^ 2))
Else
Message.Info("unavalaible coefficients")
Next
Return a, b, c
End
But i see nothing as error. I need help please
------------------------------------------------------------------------------
Check out the vibrant tech community on one of the world's most
engaging tech sites, Slashdot.org! http://sdm.link/slashdot
_______________________________________________
Gambas-user mailing list
Gambas-user@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/gambas-user
