Программка на паскальНайти количество частей массива целых чисел c(14), великих куба

Программка на паскаль
Отыскать количество частей массива целых чисел c(14), великих куба второго элемента массива этого массива. Если таких частей нет выдать сообщение- поиск безуспешен

Задать свой вопрос
1 ответ
//PascalABC.NET 3.3,сборка 1611 от 06.01.2018

//Внимание! Если программка не работает, обновите версию!

begin

  var mas:=ArrRandom(14,-99,99); mas.Println;

  var a:=mas[1]**3; var b:=mas.Where(t-gt; tgt; a).Count;

  if b=0 then Writeln('поиск безуспешен') else 

  Writeln('Таких частей -gt;',b);

end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт