Дешифровщику необходимо восстановить поврежденный фрагмент сообщения, состоящий из четырех символов. имеется достоверная информация, что использовано не более пяти букв (x, y, z, v, e при этом на четвертом месте стоит один из символов x, z, y. на третьем месте – гласная буква (y, e), если четвертая буква согласная, или любая согласная, если четвертая гласная. на втором месте – одна из букв z, y, x, v, не стоящая в слове на первом или четвертом месте. на первом месте – любая согласная буква, не стоящая на третьем месте. появилась дополнительная информация, что возможен один из четырех вариантов: 1) vzyz 2) yvez 3) vyyz 4) zvzy. дешифровщику восстановить фрагмент сообщения.

1) vzyz   нарушено условие - "на втором месте – одна из букв z, y, x, v, не стоящая в слове на первом или четвертом месте."2) yvez   нарушено условие - "на первом месте – любая согласная буква, не стоящая на третьем месте." 4) zvzy   нарушено условие - " на первом месте – любая согласная буква, не стоящая на третьем месте." ответ : 3) vyyz

у тебя уже написан ответ

Объяснение:

В первой строке вводятся целые числа n, m и k (1 ≤ n, m, k ≤ 500) - размеры доски (доска размера n*m) и число фигур на доске.

В следующих k строках выводятся по 2 числа: xi и yi (1 ≤ xi ≤ n, 1 ≤ yi ≤ m) - координаты i-й фигуры.

Формат результата

В первой строке выведите x (0 ≤ x ≤ n*m) - максимальное число слонов, которое вы можете поставить так, чтобы они не били друг друга.

В следующих x строках выведите по 2 числа: xi и yi - координаты i-го слона, которого вы поставили. 1 ≤ ri ≤ n, 1 ≤ ci ≤ m.

Примеры

Входные данные

3 3 0

Результат работы

4

1 1

1 2

1 3

3 2

Входные данные

3 4 2

3 3

2 3

Результат работы

7

1 1

1 2

2 4

1 4

3 2

3 1

3 4

Входные данные

1 3 2

1 2

1 3

Результат работы

1

1 1

Вариант №1 (не совсем удачный, как было отмечено в комментариях). //pascalabc.net (версия 3.1, сборка 1210 от 29.03.2016) var n,i,m: integer; flag: boolean; begin   readln(n);   flag: =false;   if (n mod 2< > 0)then i: =n-1 else i: =n;   while i> 0 do begin          if power(2,i)< =n then begin           write(power(2,i),' '); flag: =true;       end;       i: =i-2; end; if not flag then writeln(0); end. тест №1 1025 1024 256 64 16 4 тест №2 1 0 вариант №2 var a,i,n: integer; begin   a: =1; readln(n);   i: =trunc(log2(n)); //получим степень двойки для n   //если i нечетное,   //то первое искомое число получаем путем сдвига влево на i-1 в   //двоичном представлении числа иначе сдвиг на i   if (i mod 2)=1 then a: =a shl(i-1) else a: =a shl i;   //далее получаем числа сдвигая вправо на 2 разряда   //в двоичном представлении числа   while a> =2 do begin       write(a,' ');       a: =a shr 2;   end; end. тестовое решение: 2147483647 1073741824 268435456 67108864 16777216 4194304 1048576 262144 65536 16384 4096 1024 256 64 16 4