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)))

)

)


 

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

32295. Правомерное поведение. Понятие. Социальная и юридическая природа. Виды правомерного поведения и их характеристика 46 KB
  Правомерное поведение. Правомерное поведение охватывает прежде всего наиболее сознательную часть населения иными словами законопослушных или правопослушных граждан. Такое поведение необходимое условие организованного человеческого общежития взаимоприемлемых цивилизованных отношений. Следовательно правомерное поведение это такое поведение которое соответствует требованиям юридических норм.
32296. Понятие правонарушения и его признаки. Виды правонарушений. Основные пути борьбы с правонарушениями в современном обществе 30.5 KB
  Правонарушение является основным видом неправомерного поведения другой вид которого объективно противоправное деяние и соответственно оно является разновидностью правового то есть юридически значимого поведения поскольку относительно последнего неправомерное поведение наряду с правомерным выступает как его вид. Правонарушению присущи следующие признаки: правонарушение это всегда деяние и только деяние то есть действие бездействие или вербальное словесное поведение. На это обращал внимание еще Гегель; правонарушение это...
32297. Понятие, признаки и отличия юридической ответственности от иных видов социальной ответственности и других мер гос.принуждения. Вопрос об ответственности без вины. Перспективная и ретроспективная ответственность 53 KB
  Перспективная и ретроспективная ответственность. Юридическая ответственность один из видов социальной ответственности индивида Под социальной ответственностью понимается объективная необходимость отвечать за нарушение социальных норм. Социальная ответственность сложная собирательная нравственноправовая философская и этикопсихологическая категория изучаемая многими науками но под разными углами зрения. Различают моральную политическую юридическую общественную гражданскую профессиональную и другие виды ответственности которые в...
32298. Виды юридической ответственности по российскому праву. Их понятие и характеристика 30.5 KB
  Виды юридической ответственности по российскому праву. Отмеченные виды ответственности носят публичный характер т. субъектом привлечения к уголовной и административной ответственности выступает государство. Уголовной ответственности подлежит то лицо которое совершило преступление.
32299. Становление, развитие и историческая оценка теории правового государства 62 KB
  Становление развитие и историческая оценка теории правового государства Представления о государстве как организации осуществляющей свою деятельность на основе закона начали формироваться уже на ранних этапах развития человеческой цивилизации. С идеей правового государства связывались поиски более совершенных и справедливых форм общественной жизни. Ученые древности считали что наиболее разумна и справедлива лишь та политическая форма общежития людей при которой закон общеобязателен как для граждан так и для самого государства. В своей...
32300. Понятие, признаки и черты правового государства 44.5 KB
  Понятие признаки и черты правового государства. Непреходящим общим началом любого правового государства является его связанность правом. При этом право играет приоритетную роль лишь в том случае если оно выступает мерой свободы всех и каждого если действующие законы реально служат интересам народа и государства а их реализация является воплощением справедливости. Недавний опыт показывает что в тоталитарных государствах регулярно издавались правовые акты обеспечивалась их жесткая реализация но такое правовое регулирование являлось...
32301. Экономические, социальные, политические и идейно-нравственные предпосылки возникновения правового государства 31 KB
  Экономические социальные политические и идейнонравственные предпосылки возникновения правового государства. Экономической основой правового государства являются производственные отношения базирующиеся на многоукладности на различных формах собственности государственной коллективной арендной частной акционерной кооперативной и других как равноправных и в одинаковой мере защищенных юридически. Социальную основу правового государства составляет саморегулирующееся гражданское общество которое объединяет свободных граждан носителей...
32302. Государство, право и свобода личности в правовых системах различных государств. Система прав и свобод личности в современных государствах 42.5 KB
  Права человека неотъемлемое свойство человека. Если человек не обладает правами то тем самым уничтожается сама природа человеческого существа. Права человека принадлежат человеку а не государству. Права человека это социальноэкономические политические культурные и другие возможности свободного самоопределения и свободной жизнедеятельности человека.
32303. Понятие и принципы законности 75.5 KB
  Хотя ряд ученых не считают правотворчество законотворчество элементом законности полагая законотворчество в качестве предпосылки законности. Условия законности образует определенная социальная среда ее качественное состояние обусловленное правовой культурой. Состояние законности обычно связывается с реализацией и принципом верховенства закона.