Придумать жизненную ситуацию, когда можно выразиться крылатым выражение "авгиевы конюшни"?

Авгиевы конюшни это типа загрязненное помещение/место в жизни этим вырожением можно вырозиться например: иди убери в своей комнате, а то у тебя там уже "авгиевы конюшни"

Const nx=30; var n,i,k,t,j,kp : integer; p,pp: real; b: array[1..nx] of integer; beginreadln(n); if n mod 2 = 0 then beginp: = n/2; k: =round(p); pp: = k/2; kp: =round(pp); for i: =1 to n do beginb[i]: =random(98)-25; write(b[i]: 3); end; writeln; for i: = k downto 1 do beginj: =j +1; t: =b[j]; b[j]: =b[i];   b[i]: =t; if i - kp =1 then break; end; writeln; j: =k; for i: = n downto k+1 do beginj: =j +1; t: =b[j]; b[j]: =b[i];   b[i]: =t; if i - (kp+k) =1 then break; end; for i: =1 to n do  write(b[i]: 3); endelsewriteln('введено  не правино'); end.

Pascalabc.net 3.3.5, сборка 1659 от 09.04.2018 внимание! если программа не работает, обновите версию! function duplicates(a,b: int64): array of char; begin   var ha: =a.tostring.tohashset;   ha.intersectwith(b.tostring.tohashset);   result: =ha.toarray end;   begin   var m,n: int64;   write('введите через пробел два натуральных числа: ');   read(m,n);   var r: =duplicates(m,n);   if r.length=0 then writeln('нет цифр, встречающихся в обоих числах')   else r.println(',') end. примеры введите через пробел два натуральных числа: 12345 6789067 нет цифр, встречающихся в обоих числах введите через пробел два натуральных числа: 1342103 6748644 4 реализация без множеств procedure ntoarray(n: int64; a: array of boolean); begin   for var i: =0 to 9 do a[i]: =false;   if n=0 then a[0]: =true   else       while n> 0 do begin           a[n mod 10]: =true;           n: =n div 10           end end; function duplicates(a,b: int64): array of boolean; begin   var ma: =new boolean[10];   var mb: =new boolean[10];   ntoarray(a,ma);   ntoarray(b,mb);   result: =new boolean[10];   for var i: =0 to 9 do       result[i]: =ma[i] and mb[i] end;   begin   var m,n: int64;   write('введите через пробел два натуральных числа: ');   read(m,n);   var r: =duplicates(m,n);   write(' цифры: ');   for var i: =0 to 9 do       if r[i] then write(i,' ');   writeln end. пример введите через пробел два натуральных числа: 12352423 98789635233 цифры: 2 3 5