• найти сумму всех элементов массива целых чисел, больших заданного числа, больших заданного числа. Размер массива 10 заполнения массива осуществить со случайными числами от 50 до 100

Ответы 3

  • спасибо
    • Автор:

      dougherty
    • 6 лет назад
    • 0
  • пожалуйста
    • Автор:

      lily88
    • 6 лет назад
    • 0
  • // PascalABC.NET 3.3, сборка 1547 от 07.10.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(10,50,100); a.Println;  var n:=ReadInteger('n=');  Writeln('Сумма элементов, больших ',n,', равна ',a.Where(x->x>n).Sum)end.Пример71 89 78 99 99 70 82 68 56 69n= 73Сумма элементов, больших 73, равна 447
  • Добавить свой ответ

Войти через Google

или

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

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

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