Поиск:

Ответ в темуСоздание новой темы Создание опроса
> помогите решить! пожалуйста! 
:(
    Опции темы
Наталья90
  Дата 21.4.2012, 12:40 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 1
Регистрация: 21.4.2012

Репутация: нет
Всего: нет



Пожалуйста помогите решить задачки в комон лисп!!! 
1.Задана прямая y=ax+b. для произвольной точки (х,у) определить как расположена она относительно прямой.
а)выше прямой
б)на прямой
в)ниже прямой

2.вычислить сумму: S=k^2-(2k)^2+(3k)^2-...+(-1)^(n-1)*(kn)^2
PM MAIL   Вверх
k0rvin
Дата 22.4.2012, 15:42 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 442
Регистрация: 24.1.2010

Репутация: нет
Всего: 5



Код

;; 1.
;; for y = 2x + 3

(defun y (x)
  (+ (* 2 x) 3))

(defun where-is-a-point? (x y)
  (let ((line-y (y x)))
    (cond ((< line-y y) 'upper)
          ((> line-y y) 'lower)
          ( t           'on-line))))

;; 2.

(defun s (k n)
  (loop :for i :from 1 :to n
        :sum (* (expt -1 (- n 1))
                (expt (* k i) 2 ))))



--------------------
“Object-oriented design is the roman numerals of computing.” — Rob Pike
All software sucks
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума LISP
Void
  • Пожалуйста, создавайте темы с содержательными названиями.
  • Lisp — это целое семейство языков. Всегда указывайте в теме используемый диалект (Common Lisp, Scheme и т.д.).
  • Уважаемые учащиеся, здесь всегда рады помочь Вам, но не делать за Вас вашу работу. У вас гораздо больше шансов получить помощь, если Вы приложите усилия и поделитесь с нами проблемами и результатами. В противном случае добро пожаловать в раздел Центр Помощи.
  • Получив ответ на интересующий Вас вопрос, не забудьте пометить его как решённый.

Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Void.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | LISP | Следующая тема »


 




[ Время генерации скрипта: 0.0372 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.