В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
ilyaxybaeshka
ilyaxybaeshka
22.05.2020 23:50 •  Информатика

Напишите программу(на Python), которая ищет среди целых чисел, принадлежащих числовому отрезку [130149; 130211], числа, имеющие ровно четыре различных натуральных делителя, не считая единицы и самого числа. Для каждого найденного числа запишите эти четыре делителя в ответ с новой строки в порядке убывания произведения этих четырёх делителей. Делители в строке должны следовать в порядке возрастания и быть записаны через пробел. Например, в диапазоне [10,18] ровно четыре целых различных натуральных делителя имеют 12 и 18, поэтому для этого диапазона ответ:

2 3 6 9

2 3 4 6

Показать ответ
Ответ:
irushkanet
irushkanet
13.06.2022 12:59
#include "iostream" using namespace std; int main(){ int secound =0; int hh =0; int mm =0; int ss =0; int ch[5]; cin >> secound; hh = secound / 3600; mm = secound/60 - hh * 60; ss = secound - hh*3600 - mm *60 ; if(hh >=24){ int b = hh / 24; hh = hh - 24 *b; } ch[0] = hh; if(mm< 10){ ch[1] =0; ch[2] = ss; }else ch[1] = mm / 10; ch[2] = mm - mm / 10 * 10; if(ss< 10){ ch[3] = 0; ch[4] = ss; } else ch[3] = ss /10; ch[4] = ss - ss / 10 * 10; cout << ch[0] << ':' << ch[1] <
0,0(0 оценок)
Ответ:
Ангелочек350
Ангелочек350
26.10.2022 07:07
Program pr;
uses crt;

Var mas:array[1..1000, 1..1000] of integer;
N,i,j,sum:integer;

Begin
Writeln('Введите размер матрицы N*N');
Write('N = ');readln(N);
if (N>1000) or (N<1)  then  
Writeln('Ошибка, указанные значения выходят за пределы матрицы')   else   
 Begin      
   Writeln('Введите элементы матрицы');      
   sum:=0;   
   for i:=1 to N do     
     for j:=1 to N do     
         Begin     
           readln(mas[i,j]);       
           if (mas[i,j] mod 2 <> 0)
                then sum:=sum+mas[i,j];     
          end;      

     Writeln();   
     Writeln('Исходная матрица');   
     for i:=1 to N do   
        Begin     
            for j:=1 to N do     
               Begin     
                  Write(mas[i,j], ' ');     
               end;     
             Writeln();   
         end;         

     Writeln();   
     Writeln('Сумма нечетных элементов = ',sum);      

  end;

readln;
end.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота