Том и джерри играют в карточную игру, правила которой просты. на столе лежат n карт лицевой стороной вверх, на каждой карте записано по одному числу. за один ход разрешается убрать со стола любые две карты с равными числами. игрок, который не может сделать ход из-за того, что на столе не осталось ни одной пары карт с равными числами, считается проигравшим. первым ходит том. вам необходимо определить, кто из них выиграет — том или джерри. формат входных данных в первой строке записано одно целое число n – количество карт(1 ⩽ n ⩽ 105). в следующей строке записаны через пробел n целых чисел, каждое от 1 до 105 включительно. формат выходных данных выведите 1, если выиграет том; выведите 2, если выиграет джерри. напишите, , прогу на c++, совсем с ног сбился, если что код для перевода с pascal: for i : = 1 to n do begin read(a); inc(count[i]); end; sum : = 0; for a : = 1 to 100000 do sum : = sum + count[a] div 2; write(2 – sum mod 2);

1.Составные условия — это условия, состоящие из двух или более простых условий, соединенных с логических операций: and , or , not . Простые условия при этом заключаются в скобки.

2.Простое условие — это два выражения, связанные одним из знаков отношений: = (равно), (больше), = (больше либо равно), ... Составные условия — это условия, состоящие из двух или более простых условий, соединенных с логических операций: and, or, not.

3.Логические операции и таблицы истинности

Логическое умножение или конъюнкция: ...

Логическое сложение или дизъюнкция: ...

Логическое отрицание или инверсия: ...

Логическое следование или импликация: ...

Логическая равнозначность или эквивалентность:

4.Порядок выполнения логических операций в выражении (от наибольшего приоритета к наименьшему): инверсия, конъюнкция, дизъюнкция, импликация, эквивалентность.

5. Условный оператор.

Для проверки условия используются условный оператор.

6. ответ на фоте.

1)x = (input('x= '))

y = (input('y= '))

z = (input('z= '))

c = ((x % 3 == 0) and (y % 3 == 0) and (z % 3 == 0))

print(

else:

print

2)uses crt;

var x,y:real;

   f1,f2:boolean;

begin

clrscr;

writeln('Введите 2 числа:');

readln(x,y);

f1:=(x>2)and(y>3);

f2:=(x>1)and(y>-2);

writeln(f1);

write(f2);

readln

end.

3)uses crt;

var a,r:real;

begin

clrscr;

write('Введите сторону квадрата и радиус круга-> ');

readln(a,r)

if sqr(a)>pi*sqr(r) then write('У квадрата') else write('У круга');

readln;

end.

5)uses crt;

Var a, i, n, S: integer;

Begin

Write('Vvedite n '); readln(n);

S:=0;

For i:=40 to 140 do

 begin

 read(a);

 if (a mod 6 =0) then S:=S+a;

 end;

Writeln(S);

End.