Программирование в языке паскаль не с++. 1. написать программу, которая считывает с клавиатуры массив из 10 элементов и выводит минимальный элемент массива. 2. написать программу, которая считывает с клавиатуры массив из 10 элементов и выводит максимальный элемент массива и его индекс. 3. написать программу, которая считывает с клавиатуры массив из n элементов (n< 1000) и выводит максимальный и минимальный элементы массива и их среднее значение. нужно минимум две . заранее )

Лови первую задачку! Остальные не знаю:с
var a: array[1..10] of integer; i,min: integer; 
      begin     
       for i:= 1 to 10 do          
       begin         
       writeln( 'a[',i,']=');         
       readln (a[i]);         
       end;         
       min:= 32687;         
       for i:= 1 to 10 do         
        if a[i]< min then min:= a[i]; 
        writeln('min=',min); 
        end.