• Дан массив из 11 случайных, целых чисел, заданных на интервале [0,10]. Сдвинуть элементы массива на одну позицию влево.

Ответы 2

  • // PascalABC.NET 3.3, сборка 1576 от 16.11.2017// Внимание! Если программа не работает, обновите версию!beginvar a:= ArrRandom(11,0,10).ToArray;a.Println;var tmp:= a[0];for var i:= 0 to 9 doa[i]:=a[i+1];a[10]:=tmp;a.Println;end.
  • // PascalABC.NET 3.3, сборка 1579 от 18.11.2017// Внимание! Если программа не работает, обновите версию!1) Циклический сдвигbegin  var a:=ArrRandom(11,1,10); a.Println;  a:=(a[1:]+a[0]).ToArray; a.Println;end.Пример4 9 9 4 7 4 5 5 2 2 99 9 4 7 4 5 5 2 2 9 42) Простой сдвигbegin  var a:=ArrRandom(11,1,10); a.Println;  a:=(a[1:]+Arr(0)).ToArray; a.Println;end.Пример2 3 9 10 5 10 4 4 3 7 23 9 10 5 10 4 4 3 7 2 0
  • Добавить свой ответ

Войти через Google

или

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

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

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