Функция будет ложна тогда, когда первая скобка истинна, а вторая ложна ( 1 --> 0 = 0 ). Из этого следует, что x не должно быть равно y, если x = 0, то y = 1 и наоборот. Построим таблицу истинности:
x y z w F
0 1 0 0 = 0
0 1 0 1 = 0
0 1 1 0 = 1
0 1 1 1 = 1
1 0 0 0 = 1
1 0 0 1 = 0
1 0 1 0 = 0
1 0 1 1 = 1
Подставив значения, отсеем лишние строки. Подходят 1, 2, 6 и 7 строки. Какая-то переменная должна быть ложна все три раза. Видим, что это строчки 1, 3 и 6, поскольку z ложна трижды. Методом анализа и перебора строк, установим, что порядок таков: zwyx
Молодой человек, я конечно понял суть задания, но вот люди, которые написали выше явно нет. Что сложного в том, что бы написать, что нужно перевести числа из одних систем счисления, в другие? Итак начнем:
первая строка: 1001110 / 58 / 66 / 303 / 116 / 78
вторая строка: 11011011110111 / 51B1 / 8187 / 422241 / 33367 / 14071
третья строка: 101111101111110110 / 513b8 / 9521a / 22224244 / 22224244 / 195574
четвертая строка: 10111111110 / 7b8 / a7a / 22114 / 2776 / 1534
пятая строка: невозможно перевести (позже объясню)
Объяснение:
Суть систем счисления, что каждое число можно записать в системе счисления. Например в жизни мы используем 10ричную. Цифра может быть до 9 включительно. В пятой строке, в восьмеричной системе используется цифра 8, что не может быть из-за ограничения.
Объяснения почему именно такие цифры вы тут не увидите, ибо слишком много работы для )
Program basketbolisti;
var
a: array [1..1000] of integer;
count, i, n: integer;
begin
count := 0;
writeln('Введите количество баскетболистов');
readln(N);
for i := 1 to N do
begin
writeln('Введите рост ', i,' баскетболиста');
readln(a[i]);
if (180 < A[i]) and (A[i] < 190) then
count := count + 1;
end;
writeln(count);
end.