profile
Размещено 5 лет назад по предмету Информатика от vlada127

Очень нужна помощь. Программа в Pascal Недавно Петя научился считать. Он тут же
заметил, что число 2 обладает замечательным
свойством - 2 + 2 = 2 × 2. Его старший брат
Ваня тут же объяснил ему, что дело не в
двойке.
"Дело в том, что последовательность 2, 2 -
волшебная," - сказал Пете Ваня. - "Волшебная
последовательность - это такая
последовательность натуральных чисел, что
сумма ее членов равна их произведению.
Например последовательность 1, 2, 3 - тоже
волшебная."
Петя тут же сложил 1, 2 и 3, потом
перемножил их и обрадовался.
Теперь Петя хочет найти более длинные
волшебные последовательности. Помогите
ему!

  1. Ответ на вопрос
    Ответ на вопрос дан kage1998
    нет решений не знаю короче вот код для 5 чисел(для 4 чисел я уже проверил)
               program gt;
    var a,b,c,d,e:integer;
    begin
    for a:=1 to 50 do
    for b:=a+1 to 50 do
    for c:=b+1 to 50 do
    for d:=c+1 to 50 do
    for e:=d+1 to 50 do
    if(a+b+c+d+e=a*b*c*d*e)then writeln(a,' ',b,' ',c,' ',d,' ',e);
    end.
    Если числа могут повторятся то ответов много Пример:
    5 2 1 1 1
    1. Ответ на вопрос
      Ответ на вопрос дан vlada127
      program B; var n, i : integer; begin assign(input, 'input.txt'); reset(input); assign(output, 'output.txt'); rewrite(output); read(n): for i := 1 to n – 2 do write(1,‘ ‘); writel n(‘2 ‘,n); close(input); close(output); end. Вот эта задача, но как написать без обращения к файлам(входным данным)
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.