М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
ELiNa98653742
ELiNa98653742
06.04.2021 15:43 •  Информатика

Решить на языке с гипотеза гольдбаха—утверждение о том, что любое чётное число, начиная с 4, можно представить в виде суммы двух простых чисел. дано целое чётное положительное число n. требуется найти и вывести все пары чисел (p, q), такие что: p—целое положительноe простое число, q— целое положительноe простое число, p+q=n. input со стандартного устройства ввода в первой строке вводится положительное целое четное число n (4< =n< =10 5 ). output требуется вывести все подходящие пары чисел (p, q). пару чисел (e, f) нужно выводить раньше пары чисел (k, p) тогда и только тогда, когда минимальный элемент пары чисел (e, f) меньше минимального элемента пары чисел (k, p). числа в паре нужно разделять пробелом, ставить пробел после второго члена пары не нужно. sample input 10 sample output 3 7 5 5 примечание попробуйте реализовать функцию isprime(n), которая возвращает 1, когда число n простое, и 0 иначе. есть заготовка для но она не доработана #include #include #include int isprime(int p) {int i; for(i=2; ((i*i)-1)< =p; i++) if(p%i==1) return 1; //if(k==2) return 1; else return 0; } //int prime(int o) //{int j; // for(j=2; ((j*j)-1)< =o; j++) //if(o%j==1)return 1; //if(l==2) return 1; //else return 0; //} int main() {int n,p,o=0; scanf("%d",& n); {for (p=1; p< =n/2; p++) if ((isprime(p)==1)& & ((n-p)%3! =0)) {printf("%d %d\n",p,o=n-p); }} return 0; } заранее ! : 3

👇
Ответ:

я просто ищу все простые числа в диапазоне от 1 до n с решето эратосфена, а далее просто сравниваю вектор с простыми числами.

мой пример решения:

#include

#include

using namespace std;

int main()

{

    int n;

    cin > > n;

    vector prime (n+1, true);

    prime[0] = prime[1] = false;

    for (int i=2; i*i< =n; ++i)

        if (prime[i])

            for (int j=2; j< =n/i; j++)

                if (prime[i*j]) prime[i*j] = false;

    for(int i = 0; i < prime.size(); ++i)

    {

        for(int j = i; j < prime.size(); ++j)

        {

            if(prime[i]& & prime[j])

                if(i+j==n)

                    cout < < i < < " " < < j < < endl;

        }

    }

    cin.get();

    cin.get();

}

4,5(12 оценок)
Открыть все ответы
Ответ:
yaroshenkopoli
yaroshenkopoli
06.04.2021
Замечание. Так как количество вводимых чисел заранее не известно, то откроем бесконечный цикл со всегда верным условием True, но как только будет введено число 0, остановим цикл командой break.

Программа:

program z;
var k,s,x:integer;
begin
k:=0;              {начальное значение количества двузначных чисел}
s:=0;              {начальное значение суммы двузначных чисел}
while True do  {открываем бесконечный цикл}
begin
readln(x);        {вводим число х}
if x=0 then break;  {если введенное число равно 0, то остановить цикл}
if (x>9)and(x<100) then  {если число двузначное, т.е. от 10 до 99} 
    begin 
    k:=k+1;         {количество увеличиваем на 1}
    s:=s+x;         {увеличиваем предыдущее значение суммы на число х}
    end;
end;
if k=0 then writeln('NO')  {если двузначных чисел не было, то вывод NO}
   else writeln(s/k);          {иначе вывод ср.арифметического}
end.
4,8(18 оценок)
Ответ:
ikstar
ikstar
06.04.2021
Program aaa;
type   
   t=array[1..30] of integer;
var   
   a:t;   
   i,h,max,max1,y:integer;   
   q,c:real;
procedure chet(a:t);   
   var     
      i,z:integer;   
   begin     
      z:=0;     
      for i:=1 to 30 do         
      if(odd(a[i])=false) then inc(z);     
      writeln(z);   
   end;
begin   
   for i:=1 to 30 do     
      read(a[i]);   
   //1   
   chet(a);   
   //2   
   h:=0;   
   c:=0;   
   for i:=1 to 30 do     
      if((a[i] mod 3 = 0) and (a[i] mod 9 <> 0) and (a[i]>9) and (a[i]<100)) then begin                 inc(h);     
         c:=c+a[i];   
      end;   
   if(h=0) then writeln(-1)     
    else writeln(c/h);   
   //3   
   h:=0;   
   max:=0;   
   for i:=1 to 30 do begin     
      if((odd(a[i])=false) and (y=0)) then begin           
         h:=i;           
         y:=1;           
         continue;     
      end;     
      if((y>0) and ((odd(a[i])=false))) then          
         inc(y)       
       else         
        if(y>max) then begin           
           max:=y;           
           max1:=h;           
           y:=0;         
       end           
        else y:=0;   
   end;   
   for i:=max1 to max+max1-1 do     
      write(a[i],' ');   
   writeln;   
   //4   
   readln(h);   
   y:=a[h];   
   for  i:=h to 29 do     
      a[i]:=a[i+1];   
   for i:=1 to 29 do     
      write(a[i],' ');   
   for i:=29 downto h do     
      a[i+1]:=a[i];   
   a[h]:=y;   
   writeln;   
   //5   
   max:=0;   
   max1:=0;   
   for i:=1 to 30 do begin     
      if(a[i]>max) then begin         
         max1:=max;         
         max:=a[i];     
      end;     
      if((a[i]>max1) and (a[i]<max)) then          
         max1:=a[i];   
   end;   
   writeln(max1);
end.
4,8(41 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ