Помогите, пожалуйста Imax:=1 for i:=2 to 10 do if a [i]>a [imax] then imax:=i; write ('Наибольший элемнт a[', imax, ' ]=', a[imax]) самостоятельно запишите программу, в которой осуществляется формирование целочисленного массива a из 10 элементов значения которых лежат в диапозоне от 0 до 99,и поиск наибольшего элемента этого массива.