Форум программистов, компьютерный форум, киберфорум
Другие языки программирования
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Программирование [Ada] Заработала интерактивная обучающая платформа для языков Ada и SPARK https://www.cyberforum.ru/ other-lang/ thread2655551.html
Желаю не болеть коронавирусом всем! Адакоровцы сделали обучающую платформу - набор связанных между собой курсов по языкам Ada и SPARK https://learn.adacore.com/ Хоть я сам сейчас на Аде и не...
Не работает самописная программа, идея которой удалять файлы Программирование
Была идея, написать программу, которая при нажатии на определённую клавишу отправляла в корзину последний записанный файл. То есть я записываю видео в bandicam, файлы создаются и именуются в папке...
Найти произведение положительных элементов вектора, расположенных на нечетных местах Программирование
Помогите пожалуйста вот такой задачкой в Scilab или Matlab M. Я только начал обучаться и пока непониманию как это делать. Найти произведение положительных элементов вектора, расположенных на...
Программирование С#. Модуль для ГИС Ингео Здравствуйте! каким образом можно реализовать модуль "автоматизированной векторизации объектов из растровой основы" для ГИС Ингео? Можно ли применить методы распознавания образов (н-р, нейросеть) или... https://www.cyberforum.ru/ other-lang/ thread2644422.html
Программирование Кумир- Работа с файлами https://www.cyberforum.ru/ other-lang/ thread2643233.html
Парни, Не работают файловые команды, вообще открыть на запись/открыть на чтение, и т.д. ошибка алг-функцию не вызывать (2706) Версия 1.9 в версии новее ни работает вообще всё, Ни...
[КуМир] Задания цикла "нц для" Программирование
Сделать 1 вариант с использованием цикла "нц для", пожалуйста https://sites.google.com/site/sredaprogrammirovaniakumir/cikl-s-parametrom-cikl-dla
Что это за язык программирования? Программирование
Можете подсказать, что это за язык?? begin integer очередь; oчередь : = 1; parbegin процесс1: begin L1 : if(очередь=2)then goto L1;
Программирование Метод k-means на языке R Добрый день! Делаю кластеризацию, но метод k-means не работает с незаполненными полями в данных. При вызове этой команды summ.1 = kmeans(testData.01, 4, iter.max = 100, nstart = 1) Выдает... https://www.cyberforum.ru/ other-lang/ thread2635442.html
Программирование как сделать https://www.cyberforum.ru/ other-lang/ thread2634847.html
Часть 1. Разработка тестовых наборов с использованием метода эквивалентного разбиения 1. Ознакомиться с теоретическими сведениями по стратегиям тестирования. 2. В соответствии с вариантом,...
Программирование FBD LD IL ST Выполнить задание на языках FBD LD IL ST https://www.cyberforum.ru/ other-lang/ thread2631409.html
4320 / 3329 / 339
Регистрация: 12.03.2013
Сообщений: 5,828
30.05.2020, 17:33 0

пример надо реализовать в DrRacket

30.05.2020, 17:33. Просмотров 1927. Ответов 9
Метки (Все метки)

Ответ


Видите, Scheme - маленький язык, учить нечего.

Ну, если работает, то слава богу. Но вообще, это не очень хорошее определение sum2, при большом числе слагаемых программа может поперхнуться. Почему? Вы пишете, что для того чтобы посчитать sum2, нужно посчитать sum2 от других аргументов и что-то прибавить. Как будет считать программа? Вы скажете: сложить от 1 до 1000. По инструкции для этого надо сначала сложить от 2 до 1000, а потом что-то прибавить. Программа запоминает, что надо будет в конце прибавить, и вычисляет сумму от 2 до 1000. Для этого ей опять надо запомнить, что что-то в конце прибавить, и складывать от 3 до 1000. В конце концов она дойдёт до суммы от 1001 до 1000, вычислит её и начнёт вспоминать, что там надо было прибавлять. Вспоминать - тысячу раз! А если бы сумма была до миллиона, то миллион раз. Можно поперхнуться.

Вместо этого лучше хранить накопленную сумму:
Lisp
1
2
3
4
(define (sum3 f ot-a do-b sum)
  (if (> ot-a do-b)
      sum
      (sum3 (+ 1 ot-a) do-b (+ sum3 (f ot-a)))))


Вернуться к обсуждению:
пример надо реализовать в DrRacket
2
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.05.2020, 17:33
Готовые ответы и решения:

Scheme код в DrRacket
Перевод чисел из шестнадцатеричной системы в двоичную. Число записано в файле hex.in, вывод в файл...

Как исправить на код DrRacket
(defun hex-to-bin (&optional (in "d:/hex.in") (out "d:/bin.in") ) (with-open-file (s in...

Почему DrRacket не компилирует код
Кто нибудь объясните мне пожалуйста почему DrRacket не компилирует следующий код (я только начал...

Надо сделать пример!
Надо решить в этот пример , в C# Windows Form вот так

9
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.