Есть ответ 👍

Введите два числа а и в. проверьте, есть ли у них одинаковые цифры.

296
477
Посмотреть ответы 2

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

ГIOJLNHA
4,5(53 оценок)

Var   s, s1: string;   i: integer; begin   readln(i);   s : = inttostr(i);   readln(i);   s1 : = inttostr(i);   for i : = 1 to length(s) do     if (pos(s[i], s1) > 0) then       s1 : = '-';   if (s1 = '-') then     writeln('yes')   else     writeln('no'); end.

5символов в 34 байт 272 бит  (34*8) в 16 битной кодировке будет 17 символов  (272/16) в 8 битной кодировке будет 136 бит  (17*8) 176-136=40 бит (сколько памяти занимают символы) 40/8=5  (символов)

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