Ада-95. Компилятор GNAT



         

Пакет AdaText_IOFloat_IO


generic

type Num is digits <>; -- параметр настройки модуля

package Ada.Text_IO.Float_IO is

Default_Fore : Field := 2; -- количество символов слева -- от десятичной точки Default_Aft : Field := Num'Digits - 1; -- количество символов справа -- от десятичной точки Default_Exp : Field := 3; -- для нотации используемой -- в научных рассчетах

procedure Get -- ввод числа из указанного файла (File : in File_Type; Item : out Num; Width : in Field := 0);

procedure Get -- ввод числа из файла стандартного ввода (Item : out Num; Width : in Field := 0);

procedure Put -- вывод числа в указанный файл (File : in File_Type; Item : in Num; Fore : in Field := Default_Fore; Aft : in Field := Default_Aft; Exp : in Field := Default_Exp);

procedure Put -- вывод числа в файл стандартного вывода (Item : in Num; Fore : in Field := Default_Fore; Aft : in Field := Default_Aft; Exp : in Field := Default_Exp);

procedure Get -- ввод числа из строки -- (преобразование из строкового представления) (From : in String; Item : out Num; Last : out Positive);

procedure Put -- вывод числа в строку -- (преобразование в строковое представление) (To : out String; Item : in Num; Aft : in Field := Default_Aft; Exp : in Field := Default_Exp);

end Ada.Text_IO.Float_IO;




Содержание  Назад  Вперед