Регистрация
Tony271
19.06.2023 10:05
Информатика
Есть ответ 👍

Как получить корону в лайке у меня 51300 подписчиков мне 12лет

151
240
Посмотреть ответы 2

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

shamilsaidov2
shamilsaidov2
4,5(29 оценок)

незнаю

у меня нет этого придложение

flora21345
flora21345
4,4(43 оценок)
Program odinakov; var i, it, il: integer; t: boolean; begin  for i: =1 to 255 do  begin t: =true; it: =i;     il: =i mod 10;     while it < > 0 do    begin      if it mod 10 < > il then        begin          t: =false;         break;       end;       it: =it div 10;     end;     if t then writeln(i);   end; end.

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