почему делфи неправильно делит ???

[zheka21]

в данном коде

Read(B,C,D,E);
otv:=(B+C+D+E)/83;

ответ получается в таком типе 8.0132000000+E+0005 приблизительно такой ответ получ что делать ?округлить пробовал не помогло вот типы переменных

var B,C,D,E:Extended;
otv:Real;
otv2:Extended;
Read(A,B,C,D);


otv:=(A+B+C+D)/83;

h:=(A+B+C+D)-(otv*83);
почему отв 0 ???
writeln(h:2:5);

[raxp]

Delphi правильно делит.

[VIK_aka_TOR]

вероятнее всего вы выводите через консольку...
попробуйте так:

writeln(otv:5:2); // 5 знакомест на число и 2 знакоместа после запятой...