12-06-2019, 09:31 PM

Hello, I bought an HP Prime there is very little time!

I wanted to test the HP Prime Basic language by doing a vector product calculation program.

The problem is that I can not at all include variables in INPUT (I wish I could enter 4x for example instead of 4)

Code:

EXPORT Produit_Vectoriel()

BEGIN

LOCAL A,B,C,D,E,F;

LOCAL X,Y,Z,N;

INPUT({A,B,C},"Vecteur 1",{"X = ","Y = ","Z = "});

INPUT({D,E,F},"Vecteur 2",{"X' = ","Y' = ","Z' = "});

CAS("B*F*-C*E▶X");

C*D-A*F▶Y;

A*E-B*D▶Z;

CAS("sqrt(X^2+Y^2+Z^2)▶N");

PRINT();

PRINT(" ");

PRINT(" Résultat :");

PRINT(" |"+X);

PRINT(" |"+Y);

PRINT(" |"+Z);

PRINT(" ");

PRINT(" Norme : "+N);

END;

Thank you

I wanted to test the HP Prime Basic language by doing a vector product calculation program.

The problem is that I can not at all include variables in INPUT (I wish I could enter 4x for example instead of 4)

Code:

EXPORT Produit_Vectoriel()

BEGIN

LOCAL A,B,C,D,E,F;

LOCAL X,Y,Z,N;

INPUT({A,B,C},"Vecteur 1",{"X = ","Y = ","Z = "});

INPUT({D,E,F},"Vecteur 2",{"X' = ","Y' = ","Z' = "});

CAS("B*F*-C*E▶X");

C*D-A*F▶Y;

A*E-B*D▶Z;

CAS("sqrt(X^2+Y^2+Z^2)▶N");

PRINT();

PRINT(" ");

PRINT(" Résultat :");

PRINT(" |"+X);

PRINT(" |"+Y);

PRINT(" |"+Z);

PRINT(" ");

PRINT(" Norme : "+N);

END;

Thank you