Регистрация
Тер32
05.06.2023 23:50
Информатика
Есть ответ 👍

Вкажи найкоротший шлях, що дозволить обійти всі вулиці міста

286
479
Посмотреть ответы 2

Ответы на вопрос:

vikkisitoff
vikkisitoff
4,8(53 оценок)
На чем и где я кидайте фото
Kotnakompe
Kotnakompe
4,7(12 оценок)
Var     a,b: longint; begin b: =1; read(a); while a > 0 do     begin     b: =b*10+(a mod 2);     a: =a div 2     end; while b div 10 > 0 do     begin     a: =a*10+(b mod 10);     b: =b div 10     end; write(a) end.

Популярно: Информатика