Соревнования легкоатлетов С целью пропаганды здорового образа жизни и развития массового спорта Вг. Туркестане соревнования, посвященные Дню здоровья. Школь- ники приняли участие в дисциплинах по легкой атлетике. Результаты со- ревнования по бегу на дистанцию 100 ми прыжкам в длину даны в виде таблицы. Определите наилучшие результаты состязания по бегу на 100 м и прыжкам в длину. Победителя забега выделите красным цветом. Победи- теля соревнования по прыжкам в длину выделите синим цветом. Ф.И.0. Зиятбек А. Байымбет М. Каражан А. Костев Г. Ежов Т. Данабек С. Атахан К. Маулен Б. Иванов С. Таблица 6. Результаты соревнований Забег на 100 м (с) Прыжки в длину (м) 10,2 2,5 12,3 2,58 9,1 2,42 8,5 2,81 7,6 2,76 6,9 2,9 11,3 2,78 10,8 2,8 8,2 2,83

Const
   N = 13;
Var
   A:array[1..N] of integer;
   i,Max,Min,S:integer;
Begin
Randomize;
Write('Исходный массив A(',N,'):');
Min:=1;
Max:=1;
For i:= 1 to N do
    Begin
    A[i]:=random(201)-100;
    Write(' ',A[i]);
    if A[i]<A[Min] then Min:=i;
    if A[i]>A[Max] then Max:=i;
    S:=S+A[i];
    End;
WriteLn;
WriteLn('Min(A) = A[',Min,'] = ',A[Min]);
WriteLn('Max(A) = A[',Max,'] = ',A[Max]);
WriteLn('Среднее арифметическое элементов массива = ',S/N);
Write('Новый массив:');
S:=A[Min];
A[Min]:=A[Max];
A[Max]:=S;
For i:= 1 to N do
    Write(' ',A[i])
End.

Пример работы программы:

Исходный массив A(13): 60 -61 8 -60 58 -73 93 82 74 -35 89 -72 -44
Min(A) = A[6] = -73
Max(A) = A[7] = 93
Среднее арифметическое элементов массива = 9.15384615384615
Новый массив: 60 -61 8 -60 58 93 -73 82 74 -35 89 -72 -44

Наливаем полное ведро 9 литров.Переливаем во 2 ведро тогда остаётся в первом 4 литра а во втором 5 литров.Выливаем воду из 5 литрового ведра.Выливаем в 5 литровое 4 литра из 1 ведра.Тогда в первом 0 литров в 5 литровом 4 литра.Набираем полное 9 литровое ведро.Тогда получаем в одном 9 литров а во втором 4 литра.Отливаем из 9 литрового 1 литр во второе (где было 4 литра а оно 5 литровое).Тогда в одном 8 литров а во втором 5 литров.Выливаем всю воду из 5 литрового ведра.Остаётся в первом 8 литров а во втором 0 литров.Из 8 литров отливаем 5 литров во второе ведро а в пером останется 3 литра

Фф)