Реферат: Операции с числами с плавающей запятой

если РгС > РгD то МК1 иначе если РгС = РгD то МКЗ иначе МК2;

MK1:

PгB [8 ¸ 31]: = PгЗ [8 ¸ 31];

РгСм: = П(4) См, РгСм [0 ¸ 3]: = 0, Сч1 := Сч1+1

<сдвиг вправо мантиссы Х и увеличения порядка X, первоначально занесенного в РгСч1, на 1>;

Рг3[8 ¸ 31]:=РгСм[8 ¸ 31]; РгD:=Сч1, СчЦ: = СчЦ - 1

<фиксация сдвинутой мантиссы Х и увеличенного порядка X, уменьшение на 1 числа цифр мантиссы X, не вышедших за разрядную сетку>;

если СчЦ ¹ 0 то МК;

РгВ: = 0, РгА: = Рг1, РгСм := См;

ШИВых: = РгСм;

конец

<выдача Y в качестве результата—случай 2 при сравнении порядков>;

МК2:

РгА[8 ¸ 31] :=Рг1 [8 ¸31];

РгСм: = П (4) См, РгСм [0 ¸ 3] : = 0, Сч1 := Сч1-1

<сдвиг вправо мантиссы Y и уменьшение большего порядка X, первоначально занесенного в Сч1, на 1. Уменьшение производится до тех пор, пока порядок Х не сравняется с порядком Y, после чего в качестве порядка результата принимается сохраненный в Рг3 исходный порядок Х>;

Рг1 [1 ¸ 31]: = РгСм [8 ¸ 31], РгD: = Сч1, СчЦ: = СчЦ - 1,

если СчЦ ¹ 0, то МК4 иначе РгА: =0, РгВ: =Рг3, РгСм: =См, ШИВых: = РгСм,

конец

<выдача Х в качестве результата — случай 1 при сравнении порядков>;

МК4:

если РгС > PгD то МК2;

PгD[0]: = 0, РгD[1 ¸ 7]: = Рг3[1 ¸ 7], РгС = 0;

РгСОЛО : = РгС Å PгD;

Сч1: = РгСОЛО

<фиксация порядка Х после завершения выравни­вания в качестве порядка результата>;

МКЗ:

РгСм: = 0, Pгl [0 ¸ 7] : = РгСм, РгЗ [0 ¸ 7] : = РгСм

<обнуление поля порядка слагаемых>;