Информатика, опубликовано 04.03.2019 13:30
Нужна . программа в pascal недавно петя научился считать. он тут же заметил, что число 2 обладает замечательным свойством - 2 + 2 = 2 × 2. его старший брат ваня тут же объяснил ему,
что дело не в двойке. "дело в том, что последовательность 2, 2 - волшебная," - сказал пете ваня. - "волшебная последовательность - это такая последовательность натуральных
чисел, что сумма ее членов равна их произведению. например последовательность 1, 2, 3 - тоже волшебная." петя тут же сложил 1, 2 и 3, потом перемножил их и обрадовался. теперь
петя хочет найти более длинные волшебные последовательности. ему!
Ответы
Ответ оставил: Гость
Нет решений не знаю короче вот код для 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Ответ оставил: Гость
Извини нету рисунка и я не могу ответить =(Ответ оставил: Гость
Пытаюсь сформулировать нормально. Есть некая прога, обрабатывающая данные книги Экселя (2-3 листа книги). Исходные данные для работы вводятся через форму1 (с этим вроде почти разобрался). Результаты работы проги, а это несколько таблиц, графиов и итоги, - нужно представить в удобоваримом виде. Т.е.,как я себе представляю, что-то типа многостраничной "формы", где на одном листе - общий итог, на другом первый график, на следующем таблица, содержащая выборку из 1-го листа раб.книги (таблицы Экселя) и др.
Да, можно всю эту инфу оставить в том же Экселе, и смотреть результаты в Экселе. НО...
1. Не наглядно,
2. Много лишних данных...
Для ввода данных в программу инструментов много (через форму1 пользователя), а для вывода данных - как? В текстбокс или в файл что ли и всё?! Какой-то однонаправленный интерфейс получается!
Ну, я не знаю, как еще проще объяснить, что мне нужно....
Или в ВБА этого сделать нельзя и нужно на другом языке писать?
Ответ оставил: Гость
На камнях рисовали и передовали знания
Другие вопросы по информатике
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
