Программирование в AutoCAD

Упражнение 1:

Номер 1

Какому действию эквивалентен знак пустой строки в процедуре ("")?

Ответ:

(1) нажатию клавиши ENTER

(2) нажатию клавиши ESC

(3) нажатию клавиши SPACE

Номер 2

Что обозначает с: в имени процедуры?

Ответ:

(1) возможность вызывать процедуру по имени как команду

(2) то, что она сохраняется на диске С

(3) это часть имени

Номер 3

Что обозначает идентификатор princ?

Ответ:

(1) это функция печати (вывода на экран)

(2) оператор печати

(3) это приглашение

Упражнение 2:

Номер 1

Когда начинает работать интерпретатор AutoLISP?

Ответ:

(1) когда даем команду на выполнение процедуры

(2) как только в командной строке набираем круглую скобку

(3) при открытии интегрированной среды разработки

Номер 2

По какой команде загружаются файлы AutoLISP в программу AutoCAD?

Ответ:

(1) меню Tools - Load Text in Editor - в среде Visual LISP

(2) (load "имя процедуры") - в командной строке в среде AutoCAD

(3) загружаются автоматически из списков файлов поддержки

Номер 3

Как вызвать диалоговое окно Load/Unload Applications

Ответ:

(1) Tools - AutoLISP - Load Application

(2) набрать Load в командной строке

(3) меню Tools - Load Applications или AppLoad

Упражнение 3:

Номер 1

Где в процедуре располагается имя функции?

Ответ:

(1) внутри круглых скобок

(2) перед аргументами

(3) сразу после открывающей круглой скобки

Номер 2

Какими символами в AutoLISP обозначаются "истина" и "ложь"?

Ответ:

(1) T и Nil

(2) True и False

(3) 1 и 0

Номер 3

Нужно ли в процедурах AutoLISP объявлять переменные и их тип?

Ответ:

(1) нет, не нужно

(2) да, как во всех языках

(3) функция сама преобразует аргументы в нужный тип

Упражнение 4:

Номер 1

Чем отличаются функции while и repeat?

Ответ:

(1) обе функции служат для организации цикла

(2) в цикле с функцией while число шагов не определено. Цикл с функцией repeat имеет фиксированное число повторений

(3) отличий нет - обе функции организуют циклы

Номер 2

Что возвращает функция в таком примере: (/ 5 12)?

Ответ:

(1) 0.416666 - это деление двух чисел

(2) 0, так как оба аргумента функции деления целые

(3) на экран выдаст 0, а в память занесет 0.416666

Номер 3

Что возвращает функция if (if <условие> <выражение1> [<выражение2>])?

Ответ:

(1) это условная функция, она возвращает условие

(2) выражение1, когда условие не равно Nil, а иначе - выражение2

(3) возвращает Nil

Упражнение 5:

Номер 1

Что возвратит функция rtos в таком примере:  (rtos 10.9453 1 3)?

Ответ:

(1) "1.095E+1" - преобразует число в символьный научный формат

(2) "10.9453"- преобразует вещественное число в строку

(3) "10.095" - преобразование в строку с точностью трех знаков

Номер 2

Что возвращает функция chr() в таком примере  (chr (- 65 1))?

Ответ:

(1) "@" - преобразует код ascii 64 в символ

(2) "64"

(3) Nil

Номер 3

Что возвращает функция strcat() в примере:  (strcat (chr 67) (chr 65) (chr 68))?

Ответ:

(1) "CAD"

(2) "676568"

(3) Nil

Упражнение 6:

Номер 1

Что возвратит функция apply в примере  (apply '* (list 2 3 5))?

Ответ:

(1) 10

(2) 30

(3) 50

Номер 2

Что возвратит функция mapcar() в примере:  (mapcar '/ '(2 3) '(1 5))?

Ответ:

(1) 0

(2) (2 0)

(3) (0 0)

Номер 3

Что возвратит функция foreach в примере:  (setq s 1) (foreach p '(1 2 3 4 5) (setq s (* s p)))?

Ответ:

(1) 16

(2) 120

(3) 240

Упражнение 7:

Номер 1

Что возвратит функция setq () в примере  (setq ff (open "c:\\test.txt" "w"))?

Ответ:

(1) открывается файл через переменную ff

(2) cоздается переменная ff с содержимым файла

(3) по адресу создается текстовый файл и его дескриптор #<file "c:\\test.txt"> присваивается переменной ff

Номер 2

Что возвратит функция entlast() в примере  (setq qq (entlast))?

Ответ:

(1) значение переменной qq

(2) параметры последнего примитива

(3) имя сущности последнего примитива <Entity name: 7ee83450>

Номер 3

Что возвратит функция entget() в примере  (setq qqq (entget (entlast)))?

Ответ:

(1) переменную qqq

(2) имя последнего примитива

(3) выборку из базы данных AutoCAD параметров последнего примитива в виде набора точечных пар и списков

Упражнение 8:

Номер 1

Что возвратит функция ssget в примере  (ssget "x" '((0 . "POLYLINE") (8 . "0")))?

Ответ:

(1) имя набора, например, <Selection set: 124>

(2) количество примитивов в созданном наборе

(3) Nil

Номер 2

Что возвратит функция entmake() в примере  (entmake '((0 . "circle") (10 100.0 100.0 0.0)(40 . 50.0)))?

Ответ:

(1) возвратит параметры построенной окружности ((0 . "circle") (10 100.0 100.0 0.0) (40 . 50.0))

(2) возвратит имя построенной окружности

(3) возвратит Nil

Номер 3

Что возвратит функция polar() в примере  (polar '(16.32 4.782) 0.345 4.79)?

Ответ:

(1) возвратит вычисленные координаты точки (20.8278 6.40196)

(2) возвратит полярные координаты точки

(3) возвратит Nil

Программирование в AutoCAD - тест 3