Для каждого найденного числа запишите эти шесть делителей в шесть
Условие
Напишите программу, которая ищет среди целых чисел, принадлежащих числовому отрезку [95632; 95700], числа, имеющие ровно шесть различных чётных натуральных делителей (при этом количество нечётных делителей может быть любым). Для каждого найденного числа запишите эти шесть делителей в шесть соседних столбцов на экране с новой строки. Делители в строке должны следовать в порядке возрастания.
Например, в диапазоне [2; 48] ровно шесть чётных различных натуральных делителей имеют числа 24, 36 и 40, поэтому для этого диапазона вывод на экране должна содержать следующие значения:2 4 6 8 12 242 4 6 12 18 362 4 8 10 20 40 Ответ:
Ответ
Ответ и полный разбор откроются после входа
Посмотреть ответРешение по шагам
Как рассуждать
Решение. Решим задачу перебором. Будем проверять количество делителей каждого числа из диапазона, если их количество равно шесть — записываем их в двумерный массив d. После этого выводим эти делители на экран в новой строке. Приведём решение на языке Pascal.var numDel, i, j: longint; d2: array[1..6] of longint;begin for i := 95632 to 95700 do begin numDel := 0; for j := 1 to i do begin if (i mod j =
Осталось ещё 1 шаг
then begin numDel := numDel + 1; if numDel >…
Бесплатно · займёт минуту