Дано условие и ее решение, содержащее пропуски. заполнить пропуски type linmass = array[1..100] of integer; var a : linmass; n, i, max, min : integer; begin write('количество элементов массива? '); readln(n); for i : = 1 to n do begin write('введите a[', i, '] '); readln(a[i]); end; max: =1; min: =__; for i : = 2 to n do begin if a[i]> a[max] then max: =i; if a[i] end; writeln('ответ ', (a[max]__a[min])/2 : 7: 2) end.

volkovaolesya2    2   31.07.2019 11:30    1