15 февраля, 16:58

Задание на паскале

Дан численный массив M, элементы которых упорядочены по возрастанию и число a. Не нарушая порядок возрастания элементов включить число a в массив M.

+2
Ответы (1)
  1. 15 февраля, 17:24
    0
    const n=11;

    var b:array[ 1 ... n] of integer;

    i, j, c, a:integer;

    begin

    randomize;

    for i:=1 to n-1 do begin

    b[i]:=random (50);

    write (b[i]:3);

    end;

    writeln;

    for i:=1 to n-2 do

    for j:=n-2 downto i do

    if b[j]>b[j+1 ] then begin

    c:=b[j];

    b[j]:=b[j+1];

    b[j+1]:=c;

    end;

    writeln;

    writeln ('Введите число а');

    read (a);

    writeln ('a = ', a);

    b[n]:=a;

    for i:=1 to n do

    write (b[i]:3);

    end.
Знаешь ответ?
Не уверен в ответе?
Найди верный ответ на вопрос ✅ «Задание на паскале Дан численный массив M, элементы которых упорядочены по возрастанию и число a. Не нарушая порядок возрастания элементов ...» по предмету 📙 Информатика, а если ответа нет или никто не дал верного ответа, то воспользуйся поиском и попробуй найти ответ среди похожих вопросов.
Искать другие ответы