Question

Массив из 10 целых положительных чисел задан случайным образом из отрезка от 0 до 100. Определить есть ли среди его элементов числа равные 75.

Answer 1

Ответ:

PascalABC.NET 3.6.2

begin

 var a := ArrRandom(10, 0, 100);

 a.Println; //Для проверки  

 if a.Count(p -> p = 75) > 0 then print('Yes') else Print('No');

end.

Объяснение: