• подсчитать сумму квадратов отрицательных элементов одномерного массива вещественных чисел. Паскаль.

Ответы 1

  • // PascalABC.NET 3.2, сборка 1417 от 28.03.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ReadArrReal('Вводите:',ReadInteger('n='));  Writeln('S=',a.Where(x->x<0).Select(x->x*x).Sum)end.Примерn= 5Вводите: 12 -5 0 -7.5 9S=81.25
    • Автор:

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

Войти через Google

или

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

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

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