деление целых чисел в прямом коде

[diflesh2008]

помогите плз сделать программу для деления чисел в прямом коде 20 байтных чисел с плавающей точкой....

[Ponkole]

Если не трудно оцени мою работу +ом и комментарием

Uses Crt;
var a, b :comp;
begin
clrscr;
readln(a,b);
clrscr;
readln;
writeln((a/b):0:0);
end.

[diflesh2008]

дк погоди это обычное деление?)
и что за тип comp?

[Ponkole]

comp, double, real, float - одного поля ягоды

[diflesh2008]

ответ округляется....а можно сделать чтоб не округлялся?
все понял как...

[Pein95]

writeln((a/b):0:0);замени на ето
writeln(a/b);

[Ponkole]

Да конечно вместо :0:0 поставь :7:0 или :0:7 тогда число будет показывать количество цифр после запятой
и пожалуйст у меня спор накинь мне + с комментарием типа олодец

[diflesh2008]

дк погодите, это че реально обычное деление двух чисел с плавающей запятой? О_о
и еще, как понять 20 байтных чисел, то есть любое число до размера в 20 байт?

[Ponkole]

ну получается так