Pascal/Turbo Pascal - Guardar float con 1 solo decimal? con strtofloat no lo consigo

Quisiera que si alguien introduce 5,73 se almacene en la variable 5,7.
Quisiera que empiece siendo un string para poder validar que la entrada es numérica.
¿Sabéis como puedo hacerlo?

He probado StrToFloat sin éxito.

Al trabajar con floats hay que tener bien claro que se codifican como un exponente y una mantisa, con lo que no hay número de decimales, y que, como no pueden codificarse todos los valores, se guarda el más aproximado. Si pasas a float la cadena 5,7 y el float a cadena puede salirte un 5,699999999 o un 5,7000000001.

Si lo que quieres es que no se pase a float una cadena con más de un decimal lo que tienes que hacer es no dejar al usuario meter más decimales que uno o dejarle que meta los que sea y cortar los que sobren en la propia cadena. Y para pasar ese float a cadena, lo mismo.

Muchas gracias por la explicación, aunque me temo que no entiendo lo de mantisa pero no te precoupes :S
Al pasar float a cadena el problema es el que tu me explicas, puede que si meto 5,7 me guarde 5,6 o 5,7

Lo que me gustaría es que la persona introduzca un string para asegurarme que son números y sea 7 o 7,3 lo almacene como 7,0 o 7,3
¿no hay ningún tipo de variable que sea así?, o una forma de convertir una cadena a un entero con un decimal?

vale, creo que lo tengo claro, aunque si muestro el real como tal y aparece esa "matisa" luego al volverlo a converitr para imprimir el número conversa su valor. Gracias.

Si metes un 1000 en un float se va a guardar en la memoria un 10 como mantisa y un 3 como exponente, dado que 10 elevado a la 3 es 1000.

Para lo que quieres hacer no necesitas un float. Puedes usar un integer y lo divides entre 10 al operar con él y le pones una , antes del último dígito para mostrarlo.

Lo que pasa que no puedo usar StrToInt con algo tipo "7,5" o "7.5" porque parece que da error. Si manipulo la cadena para quitarselo, sí, podría almacenarlo como Int, y luego volvérsela a poner. Muchas gracias por la ayuda.

Claro, StrToInt transforma una cadena en Integer, y 7,5 no es una cadena que represente un Integer.