Это невозможно. Ведь есть вероятность того,что карты рубашкой вверх не будут в 2 группах одинакового количества.
Удаление
копирование
перемещение
вставка
<span>Код - (франц . code), совокупность знаков (символов) и система определенных правил, при помощи которых информация может быть представлена (закодирована) в виде набора из таких символов для передачи, обработки и хранения (запоминания). Конечная последовательность кодовых знаков называется словом. Наиболее часто для кодирования информации используют буквы, цифры, числа, знаки [ напр., "-" (тире), "." (точка)] и их комбинации. Применяют в телеграфии, вычислительной технике, военном деле и др.</span>
Var
i,m,sum:Integer;
Begin
for i:=10 to 99 do
begin
m:=i mod 10;
n:=i div 10;
sum:=m+n;
if (i mod sum = 0) then Writeln(i);
end;
end.