Пронумеруем исходные утверждения.
1) круг не белый и не зеленый.
2) синяя фигура лежит между ромбом и красной фигурой.
3) треугольник не синий и не зеленый.
4) квадрат лежит между треугольником и белой фигурой.
Теперь рассмотрим каждое из них.
Из (1) круг не белый, а из (4) не белые также квадрат и треугольник. Следовательно, <em>белым может быть только ромб</em>.
5) Если ромб белый, то он не зеленый. Не зеленые также круг (1) и треугольник (3). Тогда <em>зеленый квадрат</em>.
6) Если квадрат зеленый (5), то он не синий и не красный. Не синие также ромб (2) и треугольник (3). Следовательно, <em>синий круг</em>.
7) <em>Треугольник красный</em>, поскольку остальные цвета уже распределены.
<u><em>Ответ:</em></u> Квадрат зеленый, круг синий, ромб белый, треугольник красный.
<span>1) Сообщение в кодировке ASCII : </span>
01010011
01001111 01000110 01010100
Декодированное
сообщение:
SOFT
<span>
2) Сообщение в кодировке КОИ-8 : </span>
11110000
11000001 11010000 11001011 11000001
Декодированное
<span>сообщение:
</span>
Папка
Обозначу отрицание за корень
![\sqrt{(x<7)}V(x<6)=(x\geq7)V(x<6)](https://tex.z-dn.net/?f=%5Csqrt%7B%28x%3C7%29%7DV%28x%3C6%29%3D%28x%5Cgeq7%29V%28x%3C6%29)
Отсюда высказывание ложно на полуинтервале [6; 7)
Из целых чисел подходит 6.
Ответ: [6; 7)
<h3>PascalABC.NET 3.4.2, сборка 1837 от 11.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ReadArrString(5);
var b := a.Select(t -> t.Length).ToArray;
var n := b.Max;
for var i := 0 to 4 do
Writeln(a[i]:n, b[i]:3)
end.
262144бит=32768байт=32кбайта