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

Одномерные массивы c++
вывести элементы числового одномерного массива c(n), которые одновременно кратны 2 и 7. расположить их на четные места массива.

Показать ответ
Ответ:
Дерижабль
Дерижабль
24.05.2022 21:55

я просто ищу все простые числа в диапазоне от 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();

}

0,0(0 оценок)
Ответ:
АртурЗезарахов
АртурЗезарахов
02.02.2023 09:57

program tz;

var

n,k,i,nach,pred:integer;

Function SumCifr(l:integer):integer;

var

s:string;

sum,i,j,err:integer;

begin

str(l, s);

sum:=0;

for i:= length(s) downto 1 do

begin

val(s[i],j,err);

sum:=sum+j;

end;

SumCifr:=sum;

end;

Procedure Cifri(nach,pred,k:integer);

var

i:integer;

begin

for i:=nach to pred do

if SumCifr(i)=k then

Write(i, ' ');

end;

begin

writeln('k = ');

readln(k);

writeln('n = ');

readln(n);

if n<5 then

begin

nach:=1;

for i:=1 to n-1 do

nach:=nach*10;

pred:=nach*10-1;

Cifri(nach,pred,k)

end

else

begin

nach:=10000;

pred:=32767;

Cifri(nach,pred,k);

end;

end.

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