Developing.ru

Уважаемые программисты!
Есть ли в Delphi7 оператор, который определяет кол-во знаков после запятой у числа типа real?

Если интересует именно количество знаков после запятой, можно посмотреть в helpe или любом справочнике. На худой конец можно сделать так:
var x:real; count:byte;
begin
x:=1;
i:=0;
repeat
x:=x/10;
i:=i+1;
until x=0;
showmessage(inttostr(i));
end.

ANEM, сама собой настигла мысль: "А зачем??"

Ну,ведь когда выводишь переменную типа real,то надо указывать кол-во знаков после запятой, а я не хочу, чтобы у меня после одного знака после запятой десять нулей стояло))

ANEM писал(а):Ну,ведь когда выводишь переменную типа real,то надо указывать кол-во знаков после запятой, а я не хочу, чтобы у меня после одного знака после запятой десять нулей стояло))

Вы видимо что-то не то спросили. Зачем их определять? выводи столько сколько тебе надо.
FormatFloat возможно подойдет.

FormatFloat(x,'0.000') - получишь 3 знака после запятой

или просто
Format('%.2f', [myRealVar]);