12-26-2013, 06:33 PM
Hello!
I'm writing my first program, and I'm having a little problem with the following code:
when I run the program with the following data (or any other)
I get the following error:
What am I doing wrong?
TIA. Ariel.
I'm writing my first program, and I'm having a little problem with the following code:
Code:
EXPORT tiro1()
BEGIN
local M,str,xpos0,ypos0;
local lista1, lista2;
local angulo;
CHOOSE(M, "Unidades", "SI", "US");
IF M==1 THEN
str := "m";
G := 9.80665;
ELSE
str := "pies";
G := 32.17404;
END;
//Manejo el tema del formato de los angulos
angulo := HAngle;
HAngle := 1; //Modo = grados
lista1 := {"Pos. en X:", "Pos. en Y:", "Angulo:","Vel. inicial:"};
lista2 := {"Posición inicial en X ("+str+")","Posición inicial en Y ("+str+")","Angulo alfa (grados)","Velocidad inicial ("+str+"/s)"};
INPUT ({G,H,A,V},"Condiciones iniciales",lista1, lista2);
STARTAPP("Parametric");
X1 := "G+V*COS(A)*T";
Y1 := "H+V*SIN(A)*T-G*T^2/2";
CHECK(1);
Xmin := "0";
Xmax := "G+(V^2*SIN(2*A))/G";
Ymin := "0";
Ymax := "H+(V*V*SIN(A)*SIN(A))/(2*G)";
STARTVIEW(1,1);
HAngle := angulo;
END;
when I run the program with the following data (or any other)
I get the following error:
What am I doing wrong?
TIA. Ariel.