Задать вопрос
11 августа, 19:12

В памяти есть массив из 20 элементов. Построить новый массив,

элементы которого больше 5 и входят в начальный массив и

расположений в порядке возрастания.

+2
Ответы (1)
  1. 11 августа, 20:25
    0
    Cортировка была реализована методом пузырька

    var i, n, j, b, k: integer;

    M, A: array [1 ... 20] of integer;

    begin

    n : = 1;

    for i : = 1 to 20 do

    begin

    read (M[i]) ;

    if M[i] > 5 then

    begin

    A[n] : = M[i];

    inc (n) ;

    end;

    end;

    for j : = 1 to n - 1 do

    for i : = 1 to n - j do

    if A[i] > A[i + 1] then

    begin

    b : = A[i];

    A[i] : = A[i + 1];

    A[i + 1] : = b;

    end;

    write ('Начальный массив: ') ;

    for i : = 1 to 20 do

    write (M[i], ' ') ;

    writeln;

    write ('Новый массив: ') ;

    for i : = 1 to n do

    write (A[i], ' ') ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «В памяти есть массив из 20 элементов. Построить новый массив, элементы которого больше 5 и входят в начальный массив и расположений в ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы