Разрядность числа

[Жанна]

Если переменная содержит более 3-х знаков после запятой, то программа автоматически округляет данное число.
Можно ли этого избежать (тип переменной задавала real)?

[sergey_o]

Функция FloatToString позволяет округлять до нужного количества знаков:

Код: Выделить всё

var
  r: Real; { исходное значение }
  rs: String; { округленное значение в виде строки, используем $(rs) в тексте задания }
begin
  r := 700.0 / 9.0;
  rs := FloatToString(r, 4); { округляем r до 4 цифр после запятой, получаем '77,7778' }
end.