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

Гипотеза Симона о факториале - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Вывести квадрат из звездочек http://www.cyberforum.ru/cpp-beginners/thread992336.html
Напишите программу
C++ Получить новое число M, которое образуется путем исключения средней цифры исходного числа Весь код с функцией getch() пожалуйста http://www.cyberforum.ru/cpp-beginners/thread992334.html
Win32 или QT C++
Здравствуйте!! У меня к вам вопросик! Учил Си и С++ почти 1 год!Хочу работать программистом, что бы им стать нужно выбрать направление. Как я понял имеются основные из них это: а. программист QT б. программист пишущий под Windows c. сетевой программист д. программист микроконтроллеров
Вычислить значение функции. Исполльзовать getch() C++
Тема: вычисление последовательностей. Пожалуйста весь код с функцией getch. Буду очень признателен
C++ Найти максимальное число в последовательности http://www.cyberforum.ru/cpp-beginners/thread992309.html
Помогите немного=) Прога фурычит, вот только хотелось бы узнать, как инициализировать max более логично, а не самым маленьким значением от float, например. П.С. коды с массивами кидать не надо. #include <iostream> using namespace std; void main() { setlocale (LC_ALL, "rus"); int i,n,k=0,kab=0;
C++ Даны линейный массив действительных чисел. Вычислить сумму последнего и минимального элементов массива #include <iostream> using namespace std; int main() { setlocale(0,"Rus"); int N,S; int Arr; cout<<"Введите размер массива"<<endl; cin>>N; cout<<"Введите элементы массива"<<endl; for(int i=0; i<N;i ++) подробнее

Показать сообщение отдельно
mazarinik
0 / 0 / 0
Регистрация: 02.10.2013
Сообщений: 17

Гипотеза Симона о факториале - C++

30.10.2013, 09:23. Просмотров 650. Ответов 1
Метки (Все метки)

Гипотеза Симона о факториале состоит в следующем: только четыре факториала являются произведением трех последовательных целых чисел. Вот два из них: 4!=2*3*4, 5!=4*5*6. Составить программу, находящую следующие числа.

Добавлено через 1 минуту
Pascal
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
uses crt;
var
  Fact, fi, n1, n2, n3, mn : QWord;
  i : integer;
Begin
  //Максимум 22!  
  ClrScr;
  Fact:=1; fi:=1;
  n1:=1; n2:=2; n3:=3;
  Repeat
    mn:=n1 * n2 * n3;
    While Fact<mn do
    begin
      fi:=fi+1;
      Fact:=Fact*fi;
      If fi=22 then break;
    end;
    If Fact=mn then
      Begin
        WriteLn(fi,'!=',n1,'*',n2,'*',n3,'=',mn);
        inc(i);
      end;
    If fi=22 then break;
    n1:=n2; n2:=n3; n3:=n3+1;
  Until i=4;
  WriteLn('Найдено ',i,' чисел');
  ReadLn;
End.
на поскале написал, но т.к си плохо знаю, прошу помощи
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru