Форум программистов, компьютерный форум, киберфорум
Языки JVM
Войти
Регистрация
Восстановить пароль
Другие темы раздела
JVM Clojure Project Euler: Largest prime factor https://www.cyberforum.ru/ jvm/ thread1308227.html
Простые делители числа 13195 - это 5, 7, 13 и 29. Каков самый большой делитель числа 600851475143, являющийся простым числом)?
JVM Clojure Сформировать список итерационно
Помогите пожалуйста. Формировать список, состоящий из элементов, которые встречаются в обоих исходных списках используя do. >(name ‘(a s d f g h ) ‘(q a w s e d r)) (a s d)
JVM Clojure Найти произведение натуральных двузначных чисел кратных четырем https://www.cyberforum.ru/ jvm/ thread1305571.html
Задача из форума по VBA: https://www.cyberforum.ru/vba/thread1156326.html#post6084117 Добавлено через 1 минуту (defun multiples-product (a b n) (reduce #'* (loop for e from a to b when (zerop (rem e n)) collect e))) > (four-multiples-product 12 96 4) 5457521857125853405570201949306880000
JVM Clojure Найти все совершенные числа меньше n Здравствуйте, помогите реализовать. Натуральное число n называется совершенным, если сумма всех его делителей равна 2n. Найдите все совершенные числа, меньшие 1000. https://www.cyberforum.ru/ jvm/ thread1295626.html
JVM Clojure Определите функцию (f s n), которая из списка чисел s создает новый список, прибавляя к каждому атому число n
Определите функцию (f s n), которая из списка чисел s создает новый список, прибавляя к каждому атому число n. Исходный список не предполагается одноуровневым. Для программирования использовать функционалы. (defun dobavka(s n) (cond ((null s) nil) ((if (atom (car s)) (dobavka (cdr s) n)) (cons (dobavka (car s) n) (dobavka (cdr s) n)) ) (t...
JVM Clojure Определите функцию (f s), которая вычисляет список (m1 m2 m3), состоящий из трех наибольших элементов списка s https://www.cyberforum.ru/ jvm/ thread1291561.html
Определите функцию (f s), которая вычисляет список (m1 m2 m3), состоящий из трех наибольших элементов списка s: m1>=m2>=m3. Исходный список содержит не менее трех элементов. Для программирования использовать локальные или вспомогательные функции. (defun spis(s &optional (n 3)) (if (null s) nil (if (> n 0) (sort (cons (car s) (spis (cdr s) (- n 1))) #'>) ) ))
JVM Clojure Реализовать цикл while с помощью рекурсивной функции Здравствуйте, товарищи форумчане! Дошел до изучения макросов, необходимо реализовать одну из разновидностей цикла, я остановился на цикле while. Если я правильно понимаю суть макросов, то это способ перевести одно лисповское выражение в другое. На данный момент у меня есть идея реализовать это так: наш макрос будет принимать 2 аргумента, condition и doSmth, а раскрываться он будет в следующую... https://www.cyberforum.ru/ jvm/ thread1291124.html Clojure Написать функцию, для замены элементов списка y на соответствующие элементы списка x в списке w JVM
Здравствуйте. Помогите написать функцию, осуществляющую замену элементов списка y на соответствующие элементы списка x в списке w. Применить простую рекурсию. например, y=(a b), x=(3 8), w=((a b) a (c (a (a d)))) -> ((3 8) 3 (c (3 (3 d)))). Заранее всем спасибо.
JVM Clojure Найти расстояние между точками по их координатам https://www.cyberforum.ru/ jvm/ thread1288753.html
Ребят, и еще одна задачка, с которой очень нужна ваша помощь. необходимо найти расстояние между двумя точками по их координатам. спасибо заранее
JVM Clojure Удалить все числовые атомы из списка ребят, помогите пожалуйста, нашла много подобных тем, но там либо увеличивают числовые атомы, любо удаляют атомы содержащие цифры. мне нужно две программы. сначала удалить все числовые атомы просто из списка, а вторая удалить все числовые атомы из списка и всех его подсписков. спасибо большое https://www.cyberforum.ru/ jvm/ thread1287922.html
Clojure Позиция в матрице MxN JVM
Помогите... не могу придумать как по позиции выбирать элементы матрицы.
JVM Clojure Составить новый список https://www.cyberforum.ru/ jvm/ thread1287269.html
Здравствуйте!!! Есть такая задача: Дан список произвольной структуры, в который входят как числа, так и символьные атомы. Написать функцию, которая возвращает список из двух чисел, первое из них равно сумме чисел исходного списка, а второе их количеству. Например, ((1 A)(2 (3) B (4))) —> (10 4). Функцию необходимо написать на CommonLisp. Заранее спасибо!!!
Модератор
Эксперт функциональных языков программированияЭксперт Python
36587 / 20317 / 4218
Регистрация: 12.02.2012
Сообщений: 33,616
Записей в блоге: 13
23.11.2014, 11:02 0

Clojure Project Euler: Multiples of 3 and 5 - JVM - Ответ 6888414

23.11.2014, 11:02. Показов 6580. Ответов 9
Метки (Все метки)

Ответ

Lisp
1
2
3
4
5
6
7
8
9
10
(defun sum-35 ()
  (let ((s 0))
    (iter (for i from 3 to 999 by 3) (summing i into s))
    (iter (for i from 5 to 995 by 5) (summing i into s))
    s))
 
==> sum-35
(sum-35)
 
==> 266333


Вернуться к обсуждению:
Clojure Project Euler: Multiples of 3 and 5 JVM
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
23.11.2014, 11:02
Готовые ответы и решения:

Clojure Project Euler: 10001st prime
Выписав первые шесть простых чисел, получим 2, 3, 5, 7, 11 и 13. Очевидно, что 6-ое простое число -...

Clojure Project Euler: Smallest multiple
Project Euler: Smallest multiple 2520 - самое маленькое число, которое делится без остатка на...

Clojure Project Euler - large sum
Найдите первые 10 цифр суммы следующих ста пятидесятизначных чисел: ...

Clojure Project Euler: Summation of primes
Сумма простых чисел меньше 10 - это 2 + 3 + 5 + 7 = 17. Найдите сумму всех простых чисел меньше...

9
23.11.2014, 11:02
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
23.11.2014, 11:02
Помогаю со студенческими работами здесь

Clojure Project Euler: Special Pythagorean triplet
Тройка Пифагора - три натуральных числа a < b < c, для которых выполняется равенство a * a + b * b...

Clojure Project Euler: Largest product in a series
Project Euler: Largest product in a series Наибольшее произведение четырех последовательных...

Clojure Project Euler: Largest palindrome product
Число-палиндром с обеих сторон (справа налево и слева направо) читается одинаково. Самое большое...

Clojure Project Euler: Largest prime factor
Простые делители числа 13195 - это 5, 7, 13 и 29. Каков самый большой делитель числа 600851475143,...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru