Составить блок схему Составить блок-схему алгоритма и программу. Найти максимальный элемент для каждого столбца матриц размерностью NxN. для этой программы program matrica; Uses Crt; const m=1000; var a: array[1..m, 1..m] of integer; i, j:byte; mn, n:integer; begin write('n='); read(n); for i:=1 to n do for j:=1 to n do a[i, j]:=random(11); for i:=1 to n do begin for j:=1 to n do write(a[i, j]:3); writeln; end; for j:=1 to n do begin mn:=a[1, j]; for i:=1 to n do if a[i, j] mn:=a[i, j]; end; writeln('min ', i, 'stlb=', mn); end; end.

Пусть первое утверждение первого учителя истинно. Следовательно, можно составить таблицу, где в первой колонке номер учителя, во второй правда/ложь по высказываниям (например, ПЛ означает, что первое высказывание верное, второе ложное, ЛП - наоборот), а во третьем верное высказывание:
1 :: ПЛ :: первое место у Васи
2 :: ПЛ :: второе место у Саши
3 :: ЛП :: четвёртое место у Гриши
4 :: ЛЛ :: противоречие!

Значит, у первого учителя первое высказывание ложное. Составляем таблицу:
1 :: ЛП :: второе место у Юры
2 :: ЛП :: пятое место у Васи
3 :: ЛП :: четвёртое место у Гриши
4 :: ЛЛ :: противоречие!

Мда, у задачи нет решения...