• дан массив а состоящий из 20 элементов найти сумму элементов в

Ответы 2

  • PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018Внимание! Если программа не работает, обновите версию!

    begin

     var a := ArrRandom(20, -50, 50);

     a.Println;

     var b := a.Sum;

     Println('Сумма элементов равна', b)

    end.

  • var sumArr, i : Integer; arr : Array[1..20] of Integer;Begin sumArr := 0; for i := 1 to 20 do begin sumArr := sumArr + arr[i]; end; writeln('Sum ', sumArr);End
  • Добавить свой ответ

Войти через Google

или

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

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

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