Turbo Basic 1.1. Руководство пользователя


Turbo Basic 1.1. Руководство пользователя - стр. 116


  зывалясь.Следует заметить ,что EXIT DEF необязателен,если у вас не возник-
  нет необходимости в возврате до момента достижения конца функции.
  Строками с 130 по 160 определяется алгоритм вычисления факториалов
  эта часть многострочной функции можетбыть сколь угодно длинной  или  сколь
  угодно короткой,в зависимости от необходимости.
  В  строке  170 определяется возвращаемое факториалом значение пос-
  редством назначения имени.Как ни удивительно,назначение не  является  син-
  таксическим требованием для определения функции.Если вы не выполняете наз-
  начения имени функции,то возвращаемое значение будет неопределенно.
  Определение  FNFACTORIAL  завершается  оператором  ENDDEF в строке
   180.
  Интересно ,сколько перестановок возможно с игральными картами:
          PRINT FNFACTORIAL# (52)
         дает результат 8.065817094388Е069
  Поскольку FNFACTORIAL определяется как  имеющий  формальный  пара-
  метр,аргументы с плавающей точкой перед их передачей в функцию округляются
  до    целых;например    FNFACTORIAL(2.7)    есть   то   же   самое,что   и
  FNFACTORIAL(3).Если вы вызываете FNFACTORIAL с  числом  большим,чем  может
  обработать  стандартная программа Т.Б.,обеспечивающая преобразование к це-
  лым(более 32767 или менее -32768),то во время прогона вы получите  сообще-
  ние об ошибке 6,переполнение.
  Тот  же  процесс реализуется применительно к аргументам встроенных
  функций Т.Б.,которые ожидают подачи целых аргументов;например:
        LOCATE 2.7,1 обеспечит установку курсора на строке 3.
          
         Сравнение формальных и актуальных параметров
                                                                           
  Переменные,которые появляются в списке параметров определения фун-
  кции,называются  формальными параметрами.Они служат только для определения
  функции и полностью отделены от других переменных в программе  с  теми  же
  именами.В целях иллюстрации рассмотрим эту программу:
           100 DEF FNAREA(X,Y)=X*Y



Начало  Назад  Вперед