Comunidad Gambas-es
Me dan error los paréntesis, en un programa - Versión para impresión

+- Comunidad Gambas-es (https://gambas-es.org)
+-- Foro: Gambas (https://gambas-es.org/forum-3.html)
+--- Foro: General (https://gambas-es.org/forum-4.html)
+--- Tema: Me dan error los paréntesis, en un programa (/thread-1922.html)



Me dan error los paréntesis, en un programa - Turriano - 11-04-2025

Concrétamente, en este de consola:

Public Sub Main()
  Dim final As Single
  final = calcula_Media(4, 8) 
  Print final
End

Public Function calcula_Suma33(valor1 As Integer, valor2 As Integer) As Single
  Return (valor1 + valor2) / 2
End

Es de un tutorial que estoy siguiendo y me da error en los dos paréntesis..


RE: Me dan error los paréntesis, en un programa - Shordi - 11-04-2025

Yo añadiría otos paréntesis ((valor1+valor2)/2) eso "unifica" la operación sin más cálculos añadidos...

Saludos


RE: Me dan error los paréntesis, en un programa - Shell - 11-04-2025

Hice esto, después de copiar y pegar el ejemplo.

Código:
Public Sub Main()

  Dim final As Single

  final = calcula_Suma33(4, 8)
  Print final

End

Public Function calcula_Suma33(valor1 As Integer, valor2 As Integer) As Single

  Return (valor1 + valor2) / 2

End

Y no me  ha creado error. 

¿ Qué versión de Gambas usas ?. Aquí estoy usando la Gambas 3.20.2
Pero es muy raro, no debería dar error.

La operación es clara, suma y después divide.

Saludos


RE: Me dan error los paréntesis, en un programa - Turriano - 11-04-2025

Gracias amigos, ya lo solucioné!.
Encontré un ejercicio parecido en Internet.
¡Sólo que estaba al revés!
La subrutina de abajo estaba arriba y viceversa y ahora funciona.
Parece ser que las funcionas, hay que declararlas lo primerito.