Tp1:=Float_In;

Tp2:=Float_In;

IF Float_IN>=10.0 THEN 

    FOR number:=1 TO 5 BY 1 DO 

       Tp1:=Tp1/10.0;

       IF  ( Tp1>=1.0) & ( Tp1<=10.0)THEN 

         Exponent := Number;

         Float_Out:= Tp1;

       END_IF;

    END_FOR;

ELSIF ((Float_In>=1.0)& (Float_In<10.0))THEN

    Exponent := 0;

    Float_Out:= Tp1;

ELSE

      FOR number:=1 TO 5 BY 1 DO 

      Tp1:=Tp1*10.0;

        IF  ( Tp1>1.0) & ( Tp1<10.0)THEN 

          Exponent := 0-Number;

          Float_Out:= Tp1;

        END_IF;

      END_FOR;

END_IF;

遇到过同样的问题，ST写的一段程序，处理整数位和指数位，用来在触摸屏上显示。