КВ
Кристина Валевач

Из четных значений массива A(i) создать массив b(j)



На блок схеме 🙂

Марина Федотова
Марина Федотова

j:=0;
for i:=1 to N do
if not odd(A[ i]) then
begin
inc(j);
B[j]:=A[ i];
end;

ЕЛ
Евгения Левина

if (a[ i ]/2) = (a[ i ] div 2) then begin b[ j ]:=a[ i ];inc(j);end;

Arkaxa
Arkaxa

какой язык?
Вознаграждение?
Максимальная размерность массивов?

Dmitri Kulakov
Dmitri Kulakov

На чем писать?

Похожие вопросы
Вычислите определитель матрицы A=( a i j), i=1..4, j=1..4.
чему будут равны значения. int a=0, b=1; if (a) if(b) a=b; else b=a; cout<
Как найти все элементы матрицы равные a [i, j] = a [j, i] на паскале?
Даны массивы A(N) и B(N). .Вычесть из элементов массива A(N) произвдение максимального и минимального элементов B(N).Пом
Скажите, что означает выражение: write(a[i,j],' '); в паскале?
Дано: a= 2 j - 3 j + k ; b = - j + 4 j - k . Найти скалярное произведение ( a+ b ) * (2a - b)
Помогите, срочно.... Задана целочисленная матрица a[i,j] при i=1..m, образовать одномерный массив B[j] при j=1..n, где ка
Как занести нечетные элементы двумерного массива в одномерный массив? if a[i, j] mod 2 <> 0 then дальше не знаю :)
Дан целостный массив A[n;m]. Создать одномерный массив из отрицательных элементов массива A! помогите, очень надо!!!
Turbo Pascal. Массив. Найти минимальный четный элемент массива и т.д.