Дідусик Морозик та Мерзенна вісімка Дідусик Морозик загадав певне ціле додатне число n.
Визначте, чи можливо зробити це число кратним 8, за умови що дозволяється змінити порядок цифр у числі. Зауважте, що отримане число не повинно містити провідних нулів (які знаходяться лівіше першої ненульової цифри) у своєму записі.
Вхідні дані
Перший рядок містить одне ціле число n (1≤n≤10
10
4

).
Вихідні дані
Якщо неможливо зробити задане число кратним 8, виведіть одне ціле число −1.
Інакше, виведіть число, яке кратне 8 та може бути утворене з n за можливості зміни порядку цифр.
Якщо існує кілька правильних відповідей, дозволяється вивести будь-яку з них.

С целью уменьшить размер файлов.
Это программа, осуществляющая упаковку файлов.
Имеет возможность упаковывать один и более файлов в архив или серию архивов для удобства переноса или хранения, а также распаковку архивов
область деятельности, в которой компьютеры наряду со специальным программным обеспечением используются в качестве инструмента, как для создания (синтеза) и редактирования изображений, так и для оцифровки визуальной информации, полученной из реального мира, с целью дальнейшей её обработки и хранения.
Растр выглядит в виде точек - Пикселей. Векторное изображение задается формулами.
тем что существуют разные программы выполняющий разный тип задач и для каждый из них нужно, что то свое

Program naconecto;vara,b,c,d:string;BEGINwriteln('a=');writeln('b=');writeln('c=');writeln('d=');readln(a);readln(b);readln(c);readln(d);if (length(a)>length(b)) and (length(a)>length(c)) and (length(a)>length(d)) then  begin    writeln('a uMeeT Makc gJluHy=',length(a));  endelse if (length(b)>length(c)) and (length(a)>length(d)) then  begin    writeln('b uMeeT Makc gJluHy=',length(b));  endelse if (length(c)>length(d)) then  begin    writeln('c uMeeT Makc gJluHy=',length(c));  endelse  begin    writeln('d uMeeT makc gJluHy=',length(d));  end;readln;END.