Ввести с клавиатуры 5 чисел и вывести на экран их сумму

@Нюта101 · Регистрация: 19.05.2016

Ввести с клавиатуры 5 чисел и вывести на экран их сумму. Помогите пожалуйста решить. Очень срочно!

@Catstail · 03.11.2016, 17:21

Например, так:

Lisp

(defun task ()
  (let ((s 0))
    (dotimes (i 5 s)
      (setq s (+ s (read))))))
 
==> TASK
 
(task)
 
1
2
3
4
5
 
==> 15

@Нюта101 · 03.11.2016, 17:30 **[ТС]**

Спасибо большое!!! только не могу понять какой кусок кода нужно сначала вставить в программу, чтобы заработало(

@Catstail · 03.11.2016, 18:52

Сначала:

Lisp

(defun task ()
  (let ((s 0))
    (dotimes (i 5 s)
      (setq s (+ s (read))))))

А потом:

Lisp

(task)

И вводить числа.

@Нюта101 0 / 0 / 0 Регистрация: 19.05.2016 Сообщений: 14
		1
	Ввести с клавиатуры 5 чисел и вывести на экран их сумму 03.11.2016, 16:32. Показов 1320. Ответов 3 Метки нет (Все метки) Ввести с клавиатуры 5 чисел и вывести на экран их сумму. Помогите пожалуйста решить. Очень срочно! 0

@Нюта101 0 / 0 / 0 Регистрация: 19.05.2016 Сообщений: 14
	03.11.2016, 17:30 [ТС]	3
	Спасибо большое!!! только не могу понять какой кусок кода нужно сначала вставить в программу, чтобы заработало( 0

Опции темы