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

StefaLandon StefaLandon    3   15.09.2019 17:40    0

Ответы
alechka2502 alechka2502  07.10.2020 17:58
//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-> t> a).Count;

  if b=0 then Writeln('поиск неудачен') else 

  Writeln('Таких элементов ->',b);

end.
Программа на паскаль найти количество элементов массива целых чисел c(14), больших куба второго элем
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика