[baaba]

Функция выводит ряд положительных натуральных чисел в заданном диапазоне, (count n1 n2).
Хочу понять, какой из двух вариантов правильный?
Вариант 1:

Код:

[Выделить все]

(defun count (a b)
    (while
        (< a b)
        (progn
             (princ a)
             (princ " ")
             (setq a (1+ a)))))

В этом варианте последний из членов ряда выводится как эхо выполнения комманды (setq a (1+ a))))), а все предыдущие члены как вывод (princ a). Мне это показалось не совсем правильным. Поэтому вот другой вариант, где все члены ряда выводятся коммандой princ, а эхо подавляется princ без аргументов.
Вариант 2:

Код:

[Выделить все]

(defun count (a b)
    (while
        (<= a b)
        (progn
            (princ a)
            (princ " ")
            (setq a (1+ a))))
        (princ))

Хотелось бы услышать разъяснения. Спасибо!

[kp+]

А какая разница? Работает, и хорошо. А что преподу больше нравиться, то и лучше. Дело его вкуса

[Disney]

Потому, что в не зависимости. от того, что там выводиться внутри функции, сама функция в целом, должна, что-то вернуть, значение последней операции.