(*~\Глагол\Заграница\ЧисАн\32\ц\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*)
(**)                            ОТДЕЛ АцМ32-;
(*============================================================================*)
(* НАЗНАЧЕНИЕ: 
     интерфейс на Глаголе к ассемблерному obj-файлу (описание доп.задач на ассемблере x86)
                                          Asm-файл      вырезан из \Заграница\Асм.asm
                                                     и размещён  в \Заграница\ЧисАн\32\ц\АцМ32.asm
                                   obj-файл скомпилирован в \Отделы\Заграница\ЧисАн\32\ц\Код\АцМ32.obj

   исходный код см.                                        в Глагол\Заграница\ЧисАн\32\ц\АцМ32.asm

   Низкоуровневая работа с математическим сопроцессором FPU i387 (шир.вещ.чисел с плавающей точкой).
 *============================================================================*)
(*
ИСПОЛЬЗУЕТ
  ОБХОД ;
*)

(*======== Математические (случайные числа) функции =====( x86.asm )==========*)


(*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*)
ЗАДАЧА СлучНач-(x:ЦЕЛ);  (* нач.установка генератора случ.чисел значением x:ЦЕЛ *)
КОН СлучНач;             (* выставка случайной последовательности *)

(*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*)
ЗАДАЧА СлучЦел-():ЦЕЛ;   (* получение целого случайного числа x=1+x*08088405H ПО МОДУЛЮ 2^31 (или 2^32) *)
КОН СлучЦел;             (* из заранее выставленной последовательности *)

КОН АцМ32.
