• Заполнить массив из семи элементов случайными числами в интервале [ -10,10] и найти количество нулевых элементов массива , и если их нет , то вывести на экран (нулевых элементов нет ) . Помогите пожалуйста решить .

Ответы 2

  • Пожалуйста
  • // PascalABC.NET 3.3, сборка 1573 от 04.11.2017// Внимание! Если программа не работает, обновите версию!begin  var a:=ArrRandom(7,-10,10); a.Println;  var k:=a.Where(t->t=0).Count;  if k>0 then Writeln('Кол-во нулевых элементов равно ',k)  else Writeln('Нулевых элементов нет')end.Примеры-7 9 -4 -3 0 -4 7Кол-во нулевых элементов равно 1-3 -8 -8 9 10 2 10Нулевых элементов нет
    • Автор:

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

Войти через Google

или

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

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

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