Одномерный числовой массив, состоящий из 10 элементов, заполнен случайными числами....

Question

Одномерный числовой массив, состоящий из 10 элементов, заполнен случайными числами. определить:
а) среднее арифметическое значение элементов массива
б) найти номер элемента массива, наиболее близкого к среднему значению

Answer 1

Синтаксис паскаля не помню, но алгоритм могу потсказать
var arr:массив(от 0 до 9),temp,n:ineger;
begin
//здесь заполнения массива случайными числами
temp=0;
  пока i<9<br>  n=n+arr[i];
 i=i+1;
  конец;
n=n/10;    //n=среднее арифметическое чисел
  пока j<9<br>  if(abs(arr[j]-n)  temp=arr[j];
   j=j+1;
  конец;
writeln(temp);  //выводим самое близкое значение
writeln(n);  //выводим среднее 


end.