1*2^6+1*2^5+1*2^4+0*2^3+1*2^2+1*2^1+0*2^0<span> = 64+32+16+0+4+2+0 = 118</span>
<h3>PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := SeqRandom(10000, -10, 10).Where(t -> t.IsEven)
.Take(15).ToArray;
a.Println;
a.Where(t -> t < 0).Count.Println;
a.Transform(t -> t < 0 ? 0 : t);
a.Println
end.
<h2>Пример</h2><h3>-6 10 2 4 -2 -4 2 2 10 -10 -6 -8 -8 2 -6</h3><h3>8 </h3><h3>0 10 2 4 0 0 2 2 10 0 0 0 0 2 0</h3>
Ответ:
x∈(-∞;4]
Объяснение:
Приведем выражение к следующему виду
(x <= 4) & (x < 7).
Знак & обозначает логическое "И", а значит высказывание будет истино при выполненении и левой и правой части выражения
Объединим условие. Получим: при x <=4
1. Переменная c=4,75. 4,75 - это дробь. Но переменная c задана как integer, т.е. целое число.
2. abs(x) - возвращает модуль числа x
sqr(x) - возведение в квадрат числа x
sqrt(x) - вычисление квадратного корня из числа x
random(x) - генерирование случайного числа в промежутке (0;X)