Помощь - Поиск - Пользователи - Календарь
Полная версия: Superlong
Форум «Всё о Паскале» > Pascal, Object Pascal > Задачи
_JC_
Помогите решить задачку с непонятным типом!
Задача: опредилить тип переменной Superlong(Целое число записанное в виде массива длинной 256 байт) и операцию mod для чисел такого типа!
Заранее спасибо!
Altair
Длинночисленная арифметика.
Цитата
тип переменной Superlong
:



type Tlong=array[0..255]of integer;
       Plong=^Tlong;

(Superlong - Tlong)

Цитата
и операцию mod

procedure DivLongTwo(a,b,res,ost:Plong);
begin
  fillchar(res^,sizeof(res^),0);res^[0]:=1;
  fillchar(ost^,sizeof(ost^),0);ost^[0]:=1;
  case MoreSdvigLong(a,b,0) of
   0:MakeDel(a,b,res,ost);
   1:ost^:=a^;
   2:res^[1]:=1;
  end;
end;

Цитата
что бы разделить a на b вызовите : DivLongTwo(a,b,res,ost);
res -- результат деления a на b; ost -- остаток от деления.
Это текстовая версия — только основной контент. Для просмотра полной версии этой страницы, пожалуйста, нажмите сюда.