Salida de numeros decimales limitada, al estilo de los dos puntos (:) en los writeln del turbo pascal
0000-00-00 00:00:00
function LimDec(num : real; limite : integer) : string;
begin;
result:=floattostr(round(num*power(10,limite)) / power(10,limite));;
end;
Recuerda añadir la unidad math al uses, aunque otra opcion seria hacerte tu propia funcion power, no tiene mucha historia.
Hi! Welcome to Saiyine Punto Com where I talk about anything that goes through my mind!