20979

Рекурсивная обработка числовой информации

Лабораторная работа

Информатика, кибернетика и программирование

DEFUN F1_1 M N COND = M N M M T M M F1_1 M 1 N DEFUN F1 M N COND OR = TYPE M INT = TYPE N INT WRONG_ARGUMENT_TYPE = N M F1_1 M N T F1_1 N M Определить наибольший общий делитель двух заданных чисел. Используем формулу DEFUN F2 A B A B F3 A B Определить наименьшее общее кратное двух заданных чисел. DEFUN F3 A B COND = B 0 A = A 0 B = A B F3 A B B T F3 A B A Вычислить квадратный корень из заданного числа....

Русский

2013-08-02

18.16 KB

1 чел.

Лабораторная работа № 1.

Рекурсивная обработка

числовой информации.

  1.  Подсчитать сумму квадратов целых чисел в интервале от M до N включительно.

(DEFUN F1_1 (M N)

(COND ((= M N) (* M M))

      (T (+ (* M M) (F1_1 (+ M 1) N)))

)

)

(DEFUN F1 (M N)

(COND ((OR (/= (TYPE M) INT) (/= (TYPE N) INT)) WRONG_ARGUMENT_TYPE!)

((>= N M) (F1_1 M N))

(T (F1_1 N M))

)

  1.  Определить наибольший общий делитель двух заданных чисел.

Используем формулу

(DEFUN F2 (A B)

(/ (* A B) (F3 A B))

)

  1.  Определить наименьшее общее кратное двух заданных чисел.

(DEFUN F3 (A B)

(COND ((= B 0) A)

      ((= A 0) B)

    ((>= A B) (F3 (- A B) B))

      (T (F3 A (- B A)))

)

)

  1.  Вычислить квадратный корень из заданного числа.

(DEFUN F4_1 (L R N T)

(

(SETQ T (* (/ (+ L R) 2) (/ (+ L R) 2)))

(COND ((< (ABS (- T N)) 0.00001) (/ (+ L R) 2))

       ((< T N) (F4_1 (/ (+ L R) 2) R N))

      (T (F4_1 L (/ (+ L R) 2) N))

)

))

(DEFUN F4 (N)

(COND ((< N 0) WRONG_NUMBER_ARGUMENT!)

         (T (F4_1 0 N N))

)

)

  1.  Первые два члена ряда Фибоначчи равны 1 и 2. Каждый следующий член ряда равен сумме двух предыдущих.  Определить функцию, вычисляющую N-ый член ряда Фибоначчи.

(DEFUN F5 (N)

(COND ((= N 1) 1)

             ((= N 2) 2)

              (T (+ (F5 (- N 2)) (F5 (- N 1)))

)

)


 

А также другие работы, которые могут Вас заинтересовать

51199. Анализ влияния дискретизации на перерегулирование 55.18 KB
  Цель: сравнение результатов с идеальным и неидеальным АС на одном графике при различных h. Результаты исследования влияния т и h на уравнение с неидеальным...
51200. Анализ влияния дискретности цифровой системы управления на параметры автоколебаний в системе с релейными исполнительными органами 559.64 KB
  Определить зависимость частоты и размаха автоколебаний от величины Мупр а0 и а1 при h = 1. Определить зависимость частоты и размаха автоколебаний от величины Мупр а0 Т при h = 50. Определили зависимость частоты и размаха автоколебаний от величины Мупр а0 и а1 при различных h. Результаты исследования влияния а0 и h на уравнение моделирующее работу цифровой системы управления с релейными и...
51201. Исследование биполярного транзистора 497.57 KB
  Цель работы: изучение свойств биполярного транзистора в режиме постоянного тока и при переменном сигнале в зависимости от схемы его включения. Характеристики биполярного транзистора П306А: Тип прибора Проводимость Предельные значения параметров при Т=25С Значения параметров при Т=25С П306А pnp 80 04 10 005 535 01 60120 Схемы установок для исследования транзисторов: Рис.1 Схема с общей базой для исследования выходных статических характеристик биполярного транзистора...
51202. Разработка интерпретатора текстовой (теговой) разметки документа 148.66 KB
  Идея языков разметки состоит в том, что визуальное отображение документа должно автоматически получаться из логической разметки и не зависеть от его непосредственного содержания. Это упрощает автоматическую обработку документа и его отображение в различных условиях (например, один и тот же файл может по-разному отображаться на экране компьютера, мобильного телефона и на печати...
51203. Аналитическое моделирование дискретно-стохастической СМО 241.97 KB
  Цель: Построить граф состояний СМО . Смысл кодировки состояний раскрыть (время до выдачи заявки, число заявок в накопителе и т.д.). На схеме условно обозначены
51204. Построение аналитической и имитационной модели одноканальной СМО с неограниченной очередью и ее исследование 56.42 KB
  Цель: Имеется n-канальная СМО с неограниченной очередью. Входной поток и поток обслуживаний - простейшие с интенсивностями и соответственно. Время пребывания в очереди ограничено случайным сроком , распределенным по показательному закону с математическим ожиданием...
51206. Построение синтаксического дерева 53.35 KB
  Включить в синтаксический анализатор из лабораторной работы №.3 построение синтаксического дерева. Использовать атрибутный метод Кнута, т.е. преобразовать КС–грамматику из лабораторной работы № 3 в атрибутную грамматику добавлением атрибутов и правил построения синтаксического дерева. Расширить программу синтаксического анализатора из лабораторной работы...
51207. Разработка контекстного анализатора 48.83 KB
  Для предложенного преподавателем варианта контекстного условия расширить атрибутную грамматику из лабораторной работы № 4 добавлением атрибутов, правил их вычисления, правил вычисления контекстных условий. Включить в программу синтаксического анализатора из лабораторной работы № 4 действия по вычислению атрибутов и проверки контекстных условий.