Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Нужно вычислить факториал 33, 100 и 1000 как можно проще - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Что такое "терм" http://www.cyberforum.ru/cpp-beginners/thread700679.html
Собственно что такое терм и с чем его едят? В книге Страуструпа в разделе грамматики есть такое понятие ТЕРМ и я никак не пойму что это такое?
C++ Максимальная сумма векторов массива Дан одномерный массив n написать программу,которая вычисляет максимальную из сумм,всех векторов этого массива.Векторы должны иметь не менее двух чисел. Ребята, в понедельник сдавать пожалуйста... http://www.cyberforum.ru/cpp-beginners/thread700667.html
C++ Книги с++
Надо книги для начинающих по С++. для С++
C++ Функция strcpy () - строка должна быть пустой?
Здравствуйте! Возник вопрос: пусть имеются две непустые строки s1 и s2. Правильно ли копировать содержимое строки s2 в строку s1? Или строка s1 должна быть пустой? Проверил, вроде работает и так и...
C++ Найти наибольший общий делитель двух чисел http://www.cyberforum.ru/cpp-beginners/thread700638.html
Задача "Длинный НОД" Даны два числа. Найти их наибольший общий делитель. Входные данные Вводятся два натуральных числа, не превышающих 10^9 (запись 10^9 обозначает "10 в 9-й степени", то есть...
C++ Результат -1.#IND Доброго времени суток. Выполняю вроде бы простейшее задание, но результат программа выдает странный: #include "stdafx.h" #include <iostream> #include <clocale> #include <cmath> using... подробнее

Показать сообщение отдельно
Jupiter
Каратель
Эксперт С++
6558 / 3979 / 227
Регистрация: 26.03.2010
Сообщений: 9,273
Записей в блоге: 1
Завершенные тесты: 2
18.11.2012, 00:50
just for fun
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
#include <iostream>
#include <SWI-cpp.h>
 
int main()
{
    try
    {
        PlEngine engine("libswipl.dll");
        {
            PlTermv cmd(1);
            cmd[0] = "factorial.pl";
            PlQuery query("consult", cmd);
            query.next_solution();
        }
        {
            PlTermv cmd(3);
            cmd[0] = 1000;
            cmd[1] = 1;
            PlQuery query("factorial", cmd);
            query.next_solution();
            std::cout << static_cast<const char*>(cmd[2]) << std::endl;
        }
    }
    catch(...)
    {
        std::cout << "some exception thrown";
    }
}
Prolog
1
2
3
4
5
6
factorial(0, _, 1) :- !.
factorial(1, Res, Res) :- !.
factorial(N, Acc, Res) :-
    Acc1 is Acc * N,
    N1 is N - 1,
    factorial(N1, Acc1, Res).
0
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru