Pregunta: | 67516 - NECESITO RESOLVER UN PROGRAMA |
Autor: | SOL lopez |
Dim G, M, C, r1, real, compleja, R As Double G=InputBox (“G=”): M=InputBox (“M=”): C=InputBox (“C=”) Ventana.Print “formula: “& G &“& M &“&C If (G=0) And (M=0) then Ventana.Print “La formula es degenerada” ElseIf (G=0) And (M<>0) then R1=M/C Ventana. Print “ r1=” & r1 Else R=2*G*M/C^2 If R >=0 then R1= (2*G*M) / (C^2) Ventana. Print “r1=” & r1 Else Real=(C^2) Compleja=(2*G*M) / (C^2) End if End if espero que me ayuden con esta formula agote todos los recursos con eesta formula y me dicen que es un error de compilacion: el procedimiento no es valido el erro aparece en ("G=") espro que me den una ayudadita a rsolverlo pronto vb 6.0 |