Как округлить число до 2-3 знаков после запятой на «pascal.A.B.C» если выдается ошибка?

Question

[георгий воронько]

делал прогу для вычисления дискриминанта на pascal ,так вот,при вычисление x1 и x2 выдает ошибку:Ошибка времени выполнения: Значение было недопустимо малым или недопустимо большим для Int32.

Я так понял что большей диапазон чисел и в int32 не помещаться. Как это решить?

Answer 1

[георгий воронько]

Answer 2

[SagePtr]

А зачем округлять промежуточные значения? Округляйте уже конечный результат, либо вообще не округляйте его, а уже выводите в нужном формате.

Answer 3

[Rou1997]

На сигнатуру функции смотрите.
function Round(X: real): longint;

Answer 4

[Mercury13]

Обычно в учебных работах (и даже не в учебных — именно так работает Excel) не округляют, а выводят с округлением.

writeln(x1:0:3);
writeln(x2:0:3);

Каких-то продвинутых средств округления, которые округляют дробное число до i-го знака я не вижу.
Кроме того, вы подсказали, с каким Паскалем вы имеете дело, я загрузил его и повторил прошлую ошибку — такая ошибка происходит именно что из-за округления NaN.