Есть ответ 👍

16. Выполните действия в двоичной системе счисления (записать решение и товет)
1101*11+10111-101

263
336
Посмотреть ответы 2

Ответы на вопрос:

EnglishGod
4,7(74 оценок)

1101*11+10111-101=22 121?


const n=20;

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

    i,j,c: integer;

begin

  randomize;

  for i: =1 to n do begin

    a[i]: =random(100);

    writeln('a[',i,']=',a[i]);

  end;

  for i: =1 to n do begin

    while (a[i] mod 2 < > 0) do begin

      c += 1;

      for j: =i to n-1 do begin

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

        a[j+1]: =0;

      end;

    end;

  end;

 

  writeln('размер массива: ',n-c);

  for i: =1 to n-c do begin

    writeln('a[',i,']=',a[i]);

  end;

end.

Популярно: Информатика