Дважды два
Для развития математических способностей у студентов, предлагается следующее упражнение. Дается список, состоящий из положительных случайных неповторяющихся целых чисел. Длина списка от 2 до 15. Требуется сосчитать, сколько в списке чисел, равных некоторому удвоенному числу из этого же списка. Вы должны написать программу, которая поможет выставить студентам оценки. Эта программа должна просматривать предлагаемые списки и выводить для каждого корректный ответ. Например, для списка
1 4 3 2 9 7 18 22
Ваша программа должна выдать 3, так как 2 = 2 * 1, 4 = 2 * 2 и 18 = 2 * 9.
Входные данные
Состоит из одного или более списков чисел. В одной строке содержится один список. Каждый список содержит от 2 до 15 различных положительных целых. Все числа не превосходят 99. Каждая строка завершается нулем, который не рассматривается как часть списка. Строка с единственным числом -1 означает конец входных данных. Некоторые списки могут вообще не содержать удвоенных значений.
Выходные данные
Для каждого входного списка вывести в отдельной строке количество чисел, являющихся удвоенными значениями других.