|
|
Другие темы раздела | |
Pascal Среднее арифметическое элементов строк двухмерного массива Нужно определить среднее арифметическое элементов строк двухмерного массива и сформировать новый одномерный массив.Данные введены и выведены из файла и в файл.Заранее спасибо. https://www.cyberforum.ru/ pascal/ thread81940.html |
Линейные списки (дописать 1-2 строчки) Pascal Нужно вывести на экран все елементы в которых значение bal равно 3 program pr13; uses crt; const n=5; type pnode=^node; node=record d:word; s:string; p:pnode;bal:integer; end; var beg: pnode; key: word; i:integer; |
Pascal Функция, возвращающая время в часах и минутах на основе параметра - время в секундах Создайте функцию, которая возвращает время в часах и минутах на основе параметра - время в секундах. https://www.cyberforum.ru/ pascal/ thread81926.html |
Pascal Записать матрицы в файл и прочитать их из файла.
https://www.cyberforum.ru/ pascal/ thread81923.html Доброго времени суток!!! Помогите пожалуйста решить!! В файл t1 записать две матрицы a и b. Затем выдать эти матрицы на экран дисплея. Заранее всем СПАСИБО!!!! |
Pascal Шахматная доска, расстояние от начальной до заданной точки, некоторые клетки заняты фигурами На шахватной доске (не обязательно 8х8) стоит ферзь. Нужно определить, за сколько ходов он может добраться в заданную точку, если известны координаты начальной и заданной точки. НО дело в том, что некоторые клетки заняты фигурами, но в данный момент они не могут ходить(наверное спят :)) Итак, вводяться координаты начальной и заданной точки и координаты спящих фигур, надо определить,за какой мин.... |
Pascal Ошибка BEGIN
https://www.cyberforum.ru/ pascal/ thread81901.html Recompiling because of C:\fpc\2.2.4\bin\i386-win32\pascal work\test.pas test.pas(46) Fatal: Syntax error, "BEGIN" expected but "end of file" found test.pas(0) Fatal: Compilation aborted |
Pascal Сортировка выбором по возрастанию
https://www.cyberforum.ru/ pascal/ thread81897.html не могу сделать задачу.....помогите плиз ))))))) задача: переупорядочить заданный одномерный массив так, чтобы его элементы шли в порядке возрастания их близости к целым числам. нужно решить сортировкой выбора |
Отформатировать текст и записать его в новый файл так, чтобы все строки имели одинаковую длину, равную длине самой длинной строки. Pascal здравствуйте!!поможете с написанием программы? Дан текстовый файл, содержащий строки произвольной длины. Отформатировать текст и записать его в новый файл так, чтобы все строки имели одинаковую длину, равную длине самой длинной строки. Форматирование выполняется добавлением пробелов между словами. |
Pascal Палиндромы Уважаемые программисты!С Новым Годом Вас!Желаю всего лучшего! У меня тут маленькая проблема помогите ,пожалуйста. вот задача Дано натуральное число n. Найдите минимальное число-палиндром, больше за n. Палиндром – це число, которое одинаково читается слева направо , как справа налево. n (1<=n<10^18). Пример Ввод 131 Вывод 141 Ввод 120 Вывод 121 https://www.cyberforum.ru/ pascal/ thread81880.html | Pascal Рекурсивный сдвиг массива Доброго времени суток!!! Помогите пожалуйста!!! Дан массив x, состоящий из 10 вещественных чисел и целочисленная переменная k, необходимо элементы массива x циклически сдвинуть на k позиций влево. Составить программу используя рекурсивную функцию. Могу написать прогу без реккурсии: https://www.cyberforum.ru/ pascal/ thread81862.html |
Сортировка динамического массива Pascal Доброго времени суток!!! Помогите пожалуйста решить!! Оч. нужно!! Разработать программу сортировки (упорядочивания) матрицы размерности n*n так, чтобы элементы в каждой строке отсортированной матрицы располагались по возрастанию и ни один элемент в i-й строке не был больше любого элемента в i+1-й строке. Сортировку выполнять над одномерным массивом из n*n элементов, который "накладывается"... |
Pascal Отредактировать заданное предложение, заменяя многоточия точкой, а вместо точки ставить восклицательный знак
https://www.cyberforum.ru/ pascal/ thread81859.html Написать программу которая может отредактировать заданное предложение, заменяя многоточия точкой, а вместо точки ставить восклицательный знак.Предложение любое.Заранее спасибо. |
0 / 0 / 0
Регистрация: 01.01.2010
Сообщений: 3
|
|
02.01.2010, 14:46 [ТС] | 0 |
Найти все такие N(N<100),что у числа N!(факториал) сумма цифр-квадрат целого числа - Pascal - Ответ 45418702.01.2010, 14:46. Показов 3523. Ответов 6
Метки (Все метки)
Ответ
Да все просто, но нудно.
Сделать функции для работы с длинной арифметикой. Достаточно сделать только умножение. Посчитать в цикле I от 1 до 99 все значения I! Для каждого значения I! вычислить сумму цифр. Проверить что сумма цифр является квадратом целого числа (это тривиально). Если является квадратом, то напечатать I. я это абсолютно ясно понимаю,но скажите мне как сделать пункт "для каждого значения I! вычислить сумму цифр" и я буду Вам безмерно благодарен! Вернуться к обсуждению: Найти все такие N(N<100),что у числа N!(факториал) сумма цифр-квадрат целого числа Pascal
0
|
02.01.2010, 14:46 | |
Готовые ответы и решения:
6
Найти все такие числа N (N<=100), что у числа N! Сумма цифр – простое число Верно ли что число 4-значное и у него сумма крайних цифр равна сумме средних цифр? Найти все такие числа. Сумма цифр трёхзначного числа кратна 7, само число также делится на 7. Найти все такие числа. Сумма цифр трехзначного числа кратна 7, само число также делится на 7. Найдите все такие числа |
02.01.2010, 14:46 | |
02.01.2010, 14:46 | |
Помогаю со студенческими работами здесь
0
найти все трёхзначные числа, такие у которых сумма цифр равна A, а само число делиться на B. Найти все двузначные числа, сумма цифр которых не меняется при умножении числа на 2,3,4,5,6,7,8,9 Вывести все числа из интервала от 100 до 500, сумма цифр которых равна 15 Определить все натуральные числа m, не превосходящие числа N. Сумма всех цифр числа m-простое число. |