var
n: real;
begin
n := 123.456;
n -= frac(n); // ora vale 123
...
end
ci sono le funzioni round e trunc
tutte e due ritornano un intero ma la prima arrotonda mentre la seconda tronca
se non vuoi passare per un intero puoi usare frac, ad esempio:Codice: [Seleziona]var
n: real;
begin
n := 123.456;
n -= frac(n); // ora vale 123
...
end
var
n: real;
begin
n := 123.456;
n -= frac(n*10)/10; // ora vale 123.4
...
end
farei qualcosa tipoCodice: [Seleziona]var
n: real;
begin
n := 123.456;
n -= frac(n*10)/10; // ora vale 123.4
...
end