1. на одной улице стоят в ряд 4 дома, в которых живут 4 человека: алексей, егор, виктор и михаил. известно, что каждый из них владеет ровно одной из следующих профессий: токарь, столяр, хирург и окулист, но неизвестно, кто какой и неизвестно, кто в каком доме живет. однако, известно, что: 1) хирург живет правее столяра 2) токарь живет правее хирурга 3) окулист живет рядом с токарем 4) токарь живет через дом от столяра 5) алексей живет правее хирурга 6) виктор не столяр 7) егор живет рядом с токарем 8) егор живет правее алексея выясните, кто какой профессии, и кто где живет. прошу , )

1дом -  михаил столяр 2 дом - виктор хирург 3 дом - алексей токарь 4 дом - егор окулист

Var     n,m,d,k,max,maxk: integer; begin write('n = '); readln(n); write('m = '); readln(m); maxk: =0; for n: = m downto n do       begin       if n> 1 then k: =2       else k: =1;       d: =n div 2;       while d> 1 do             begin             if n mod d = 0 then k: =k+1;             d: =d-1             end;       if k> =maxk then             begin             maxk: =k;             max: =n;             end;       end; writeln('искомое число: ',max); writeln('количество делителей этого числа: ',maxk); end.

(сумма любых двух цифр числа всегда  ≤ 18) 1414 - суммы цифр могут быть только 14 и 14  148   -       только 14 и 8                                        145   -         только 14 и 5                                                                           214     не может быть такого результата, так как суммы цифр   могут быть         только  2 и   14, но записаны они в порядке возрастания. 515   -    5 и 15 - записаны в порядке возрастания, не соответ. условию. 814 -   8 и 14 - не соотв. условию 114 -   11 и 4   (но может быть и 1 и 14) , в принципе - такой результат возможен     ответ   5