Две одинаковые цифры
Определите, верно ли, что в заданном четырехзначном числе ровно две одинаковые цифры.

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

На вход подается целое число k (1000≤k≤9999).

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

Выведите 1 при положительном ответе на во задачи и любое другое целое число в противном случае.
Нельзя использовать функции, циклы, условные операторы

1) Birthday1.asf - 24.12.15 Birthday2.asf - 15.07.16 Clip_1.mpeg - 24.07.14 Clip_2.mov - 24.10.16 Clip_3.mov - 01.07.14 Family.avi - 12.08.13 Friends1.mov - 25.07.14 Friends2.mov - 04.01.14 Video1.avi - 19.07.14 Video2.avi - 21.11.13 Video3.wmv - 24.06.14 Video4.wmv - 10.07.15 2) Birthday2.asf - 15.07.16 Clip_1.mpeg - 24.07.14 Clip_3.mov - 01.07.14 Family.avi - 12.08.13 Friends2.mov - 04.01.14 Video2.avi - 21.11.13 Video4.wmv - 10.07.15 3) Family.avi - 12.08.13 Video2.avi - 21.11.13 Friends2.mov - 04.01.14 Clip_3.mov - 01.07.14 Clip_1.mpeg - 24.07.14 Video4.wmv - 10.07.15 Birthday2.asf - 15.07.16 Итог : Video2.avi - 21.11.13 Clip_3.mov - 01.07.14 Clip_1.mpeg - 24.07.14 Video4.wmv - 10.07.15 Birthday2.asf - 15.07.16 ответ: 5

Одномерный массив можно представить как линейную структуру, в которой элементы следуют друг за другом. Однако бывают более сложные структуры данных. Например, двумерные массивы, которые можно описать как таблицу, в ячейках которой располагаются значения. Для обращения к данным массива указывается номера их строк и столбцов. Часто табличные массивы называют матрицами. Обычно двумерные массивы на языке программирования Pascal описываются так: array [1..m, 1..n] of базовый_тип Однако можно их описывать и по-другому: array [1..m] of array [1..n] of базовый_тип