• Преоброзить масив таким образом,что бы елементы,равные нулю,размещались послех всех других

Ответы 1

  • Pascal const     n = 5; var   a : array [1..n] of integer;   i,p : integer; begin  for i := n downto 1 do   begin    if a[i] = 0 then     begin      a[i] := a[n-p];      a[n-p] := 0;      p := p +1;     end;   end;
    • Автор:

      nico
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years