Прочитай шуточные и построй графы.три брата надели три куртки.но они спешили и оделись так странно, что сами развеселились.одному из братьев не досталось куртки, но одна куртка оказалось лишней, хотя на всехбратьях были надеты куртки.соедини на графах братьев с куртками

// составить программу, которая выводит на экран таблицу деления числа 11 на целые от 1 до 10(с 2мя знаками после запятой).   var x: real;       i: word; begin     writeln('таблица деления числа 11 на целые от 1 до 10(с 2мя знаками после запятой)');     for i: =1 to 10 do   begin             x: =11/(i);             writeln('11/',i,' =',x: 0: 2);     end; end.     // со< span class="_wysihtml5-temp-placeholder"> < /span> ставить таблицу значений функции y=x^3+2 на отрезке [-5; 5] с шагом 1. var x,y: real;           i: shortint;   begin     writeln('таблица значений функции y=x^3+2 на отрезке [-5; 5] с шагом 1.');         for i: =(-5) to 5 do        begin             y: =i*i*i+2;               writeln('при х=',i,' y=',y);     end;   end.

Одномерный массив пользователь вводит размерность массива найти в массиве минимум максимум и поменять их местами паскаль целочисленный массив по одному вхождению максимума и минимума если все, то пишите! var n,imax,imin,i,r: integer; a: array[1..100] of integer; begin write('n= '); readln(n); for i: =1 to n do read(a[i]); writeln('table: '); imax: =1; imin: =1; for i: =1 to n do begin write(a[i]: 8); if a[imax]< a[i] then imax: =i; if a[imin]> a[i] then imin: =i end; r: =a[imax]; a[imax]: =a[imin]; a[imin]: =r; writeln; writeln('new table: '); for i: =1 to n do write(a[i]: 8); end.