HP PRIME mi primer INPUT [3]

[@trrsa]

EXPORT BASE5()
BEGIN
PRINT();
LOCAL f1,X0,error;
LOCAL DERIVADA;
INPUT({{f1,[8],{40,25,1}},{X0,[0],{40,25,3}},{error,[0],{40,25,5}} },"TITULO TRRSA ", {"f1(x) ","X0 ","error "},{"Ingrese valor"});
DERIVADA:=CAS.diff(f1,X);
PRINT(f1);
PRINT(X0);
PRINT(error);
PRINT(DERIVADA);
END;