• Составьте программу, Которая формирует массив из десяти случайных чисел от -45 до 45 и меняет местами значение первого и последнего элементов

Ответы 2

  • type mas= Array [1..10] of integer;var i,M:integer;a:mas;beginrandomize;for i:=1 to 10do beginA[i]:=random (-45,45);write(A[i],' ');end;writeln();A[1]:=MA[i]:=A[10]; A[10]:=M;for i:=1 to 10do write(A[i],' ');end.
    • Автор:

      blackie25
    • 6 лет назад
    • 0
  • // PascalABC.NET 3.2, сборка 1362 от 14.12.2016// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(10,-45,45); a.Println;  Swap(a[0],a[9]); a.Printlnend.Пример32 -1 21 17 13 11 -7 14 -7 44 -1 21 17 13 11 -7 14 -7 32
    • Автор:

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

Войти через Google

или

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

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

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