Есть ответ 👍

ребятаа написать программу !! Написать программу, которая выведет название вашей команды в шестнадцатеричном коде. Для тех, у кого название кириллицей — можно записать его латиницей для этого задания. Подсказка — используйте функции ord и hex

160
246
Посмотреть ответы 1

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


var n, s: integer;

begin

readln(n);

s : = 1;

repeat

case n mod 10 of

0, 6, 9: inc(s);

8: inc(s, 2)

end;

n : = n div 10

until n = 0;

writeln(s)

end.

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