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