Три учительницы -ирина васильева, дарья михайловна, софия петровна- , биологию и в школах ярославля, владимира и краснодара. известно что: ирина васильевна работает не в ярославле, а дарья михайловна не во владимире та , которая живет в ярославле, преподает не ; работающая во владимире учитель ; дарья михайловна преподает не биологию; кто в каком городе живет, какой предмет преподает.?

Используя известные нам факты построим логическую цепочку рассуждений: 1. во владимире работает учитель - это не дарья михайловна. 2. в ярославле живет тот,кто не преподает , а так как учитель живет во владимире, то в ярославле живет учитель биологии. исходя из этих 2 фактов можно сделать вывод, что  дарья михайловна - учитель , которая живет в краснодаре. так как ирина васильевна работает не в ярославле, а в краснодаре работает дарья михайловна,то можно сделать вывод, что ирина васильевна - учитель из владимира. ну и остается у нас софия петровна - учитель биологии из ярославля. ответ: ирина васильевна - учитель - владимир             дарья михайловна - учитель - краснодар             софия петровна - учитель биологии - ярославль

1) const n=20;   var   a: array[1..n] of integer;   i,j,max: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin   a[i]: =random(21)-10;   write(a[i]: 4) end; writeln; max: =-10; for i: =1 to n do   if (a[i]< 0)and(a[i]> max) then max: =a[i]; writeln('max = ',max); end. пример: исходный массив:   10   -8   10   -9   6   7   6   0   -4   10   -3   9   2   10   5   1   8   10   5   4 max = -3 2) const n=15;   var   a: array[1..n] of integer;   i,j: integer; begin randomize; writeln('исходный массив: '); for i: =1 to n do begin   a[i]: =random(21)-10;   write(a[i]: 6) end; writeln; for i: =1 to n do   if a[i]< =3 then a[i]: =a[i]*a[i]*a[i]; writeln('измененный массив: '); for i: =1 to n do write(a[i]: 6); writeln; end. пример: исходный массив:     -1     -4     9     -2     10     -9     6     -6     5     -1     -2     3     1     -8     10 измененный массив:     -1   -64     9     -8     10   -729     6   -216     5     -1     -8     27     1   -512     10

// pascalabc.net 3.1, сборка 1214 от 09.04.2016 begin   var a: =arrrandom(20,-10,10); a.println;   writeln('наибольший отрицательный элемент ',       a.where(x-> x< 0).max) end. тестовое решение: 8 -10 -6 -10 6 10 0 4 -6 -7 10 -2 -7 -10 3 -5 0 -9 3 3 наибольший отрицательный элемент -2 // pascalabc.net 3.1, сборка 1214 от 09.04.2016 begin   var a: =arrrandom(15,-10,10); a.println;   a.select(x-> x< =3? x*x*x: x).println end. тестовое решение: 7 -3 5 -5 4 7 2 1 -10 9 -2 -7 4 0 5 7 -27 5 -125 4 7 8 1 -1000 9 -8 -343 4 0 5