CompToCurrency
Moduł: System
var
Foo : Comp;
Bar : Currency;
begin
Foo := 100;
Bar := CompToCurrency(Foo);
Writeln(Bar);
end.
Zobacz też:
var
Foo : Comp;
Bar : Currency;
begin
Foo := 100;
Bar := CompToCurrency(Foo);
Writeln(Bar);
end.
Zobacz też: