Inicio de sesión
Navegación
Actualmente hay 1 usuario y 9 invitados en línea.
Usuarios en línea
como se hace esta operacion en system rpl
- Inicie sesión o regístrese para enviar comentarios
como se hace esta operacion en system rpl
Lun, 08/03/2010 - 18:01
hola adictos estoy aprendiendo el system y ya he visto un poko sobre las variables temporales
y no se como podria hacer este problema usando el system por ejemplo
« -> A B C
'(-B + √(B^2-4*A*C))/(2*A)' EVAL
»
este es un secillo programa en USER RPL, donde declara tres variables temporales y
las evalua en una ecuacion '(-B+ √(B^2-4*A*C))/(2*A)'
bueno por lo que he visto en system resia algo asi
::
CK&DISPATCH1
#111
::
{ LAM A LAM B LAM C }
BIND
LAM B
%CHS
LAM B
%2
%^
LAM A
LAM C
%4
%*
%*
%-
%SQRT
%+
LAM A
%2
%*
%/
;
;
si coloco como A=1 B=5 C=2 en ambas programas obtengo = -0.438447...
pero como pueden darse cuenta fue mas simple usando el USER RPL ya que solo se reemplazo los datos en una ecuacion que fue evuluada con el comando EVAL
entonces como puedo hacer eso en System RPL
seria algo asi
'(- LAM B %+ %SQRT( LAM B^2-4* LAM A* LAM C))/(2 %* LAM A)' EVAL
bueno parece algo descabellado mi idea pero aver que opinan ustedes se puede hacer eso en system rpl??
- Inicie sesión o regístrese para enviar comentarios
Un saludo.
Bueno,una primera forma.
::
x<<
%1
%5
%2
xRPN->
LAM A
LAM B
LAM C
x<<
SYMBOL
LAM B
xNEG
LAM B
%2
x^
%4
LAM A
x*
LAM C
x*
x-
xSQRT
x+
%2
LAM A
x*
x/
;
xEVAL
x>>ABND
x>>
;
Compilelo en Debug4x,lo unico que hise fue enviar el codigo en user a la calculadora y luego 256 MENU y
->S2 y de copiarlo al editor de Debug4x.
- Inicie sesión o regístrese para enviar comentarios
bueno me parece muy bien q me hayas dado tu apoyo y te lo agradesco.
pero no veo gran diferencia entre mi codigo del system y el tuyo me parece q es casi lo mismo
yo esperaba que sea mas corto el codigo como el ejemplo q puse en el USER RPL
« -> A B C
'(-B + √(B^2-4*A*C))/(2*A)' EVAL
»
algo parecido a eso
RIBOflavina aprendiendo system rpl