2. Дан одномерный массив А[N] длины N. Дан программный код, выводящий положительные элементы этого массива. Заполнить прочерк. # представление массива A=array("i") N=int(inputO) S=0 А=[0]*N for i in range (0,N) # Вставка элементов массива с клавиатуры for i in range (0,N): # условие нахождения положительного числа print(A[i])
function IsHamming(n:integer):boolean;
begin
while n mod 2 = 0 do n:=n div 2;
while n mod 3 = 0 do n:=n div 3;
while n mod 5 = 0 do n:=n div 5;
Result:=(n=1)
end;
begin
var n:=ReadInteger('n=');
var s:int64:=0;
var k:=0;
var i:=2;
while k<>n do begin
if IsHamming(i) then begin
Inc(k); s+=i; Print(i)
end;
Inc(i)
end;
Writeln(NewLine,'Сумма элементов последовательности равна ',s);
n:=ReadInteger('Найти элемент с номером');
i:=2; k:=0;
while k<>n do begin
if IsHamming(i) then Inc(k);
Inc(i)
end;
Writeln('Найденное значение: ',i-1)
end.
Тестовое решение:
n= 33
2 3 4 5 6 8 9 10 12 15 16 18 20 24 25 27 30 32 36 40 45 48 50 54 60 64 72 75 80 81 90 96 100
Сумма элементов последовательности равна 1257
Найти элемент с номером 1000
Найденное значение: 51840000
#include <iostream> // iostream
int main() { // int main
int N; // N
int M; // M
int sum = 0; // сумма чисел хэмминга от n до m
std::cout << "N: "; // запрашиваем N
std::cin >> N;
std::cout << "M: "; // запрашиваем M
std::cin >> M;
int *hemming = new int[M - N + 1]; // массив с числами хемминга
int counter = 0; // размер массива
for (int i = N; i <= M; ++i) { // записываем числа в массим хемминга
if (i % 2 == 0 || i % 3 == 0 || i % 5 == 0) { // если остаток от деления
std::cout << i << " "; // на 2 или 3 или 5 равен нулю
hemming[counter] = i; // и выводим.
sum += hemming[counter]; // прибавляем к сумме числа
++counter; // увеличиваем счётчик
}
}
std::cout << std::endl << sum; // выводим сумму
}