 
Задайте массив из 10 элементов с помощью датчика случайных чисел . Найдите разность наибольшего
элемента и среднего арифметического элементов этого массива. Выведите на экран исходный массив и полученную разность . 0
        0
         0
        0
    Ответы на вопрос
 
        Program pr;
uses crt;
Var a:array[1..10] of integer;
    i,max:integer;
    s:real;
Begin
for i:=1 to 10 do Begin a[i]:=random(100); Write(a[i],';'); end;
Writeln;
 max:=abs(a[1]-a[2]);
for i:=1 to 9 do
    if abs(a[i]-a[i+1])>max then max:=abs(a[i]-a[i+1]);
    s:=0;
for i:=1 to 10 do s:=s+a[i];
s:=s/10;
Writeln('max=',max);
Writeln('среднее арифметическое=',s);
readln;
end.
 0
                    0
                     0
                    0
                 
            Конечно, я могу помочь вам с этим заданием.
Вот пример кода на языке Python, который создаст массив из 10 элементов с помощью датчика случайных чисел и найдет разность наибольшего элемента и среднего арифметического элементов этого массива:
```python import random
# Создание массива из 10 элементов с помощью датчика случайных чисел array = [random.randint(1, 100) for _ in range(10)]
# Нахождение наибольшего элемента max_element = max(array)
# Нахождение среднего арифметического элементов average = sum(array) / len(array)
# Нахождение разности наибольшего элемента и среднего арифметического элементов difference = max_element - average
# Вывод на экран исходного массива и полученной разности print("Исходный массив:", array) print("Разность наибольшего элемента и среднего арифметического элементов:", difference) ```
После выполнения этого кода вы увидите на экране исходный массив и полученную разность.
 0
                    0
                     0
                    0
                Похожие вопросы
Топ вопросов за вчера в категории Информатика
Последние заданные вопросы в категории Информатика
- 
			Математика 
- 
			Литература 
- 
			Алгебра 
- 
			Русский язык 
- 
			Геометрия 
- 
			Английский язык 
- 
			Химия 
- 
			Физика 
- 
			Биология 
- 
			Другие предметы 
- 
			История 
- 
			Обществознание 
- 
			Окружающий мир 
- 
			География 
- 
			Українська мова 
- 
			Информатика 
- 
			Українська література 
- 
			Қазақ тiлi 
- 
			Экономика 
- 
			Музыка 
- 
			Право 
- 
			Беларуская мова 
- 
			Французский язык 
- 
			Немецкий язык 
- 
			МХК 
- 
			ОБЖ 
- 
			Психология 
- 
			Физкультура и спорт 
- 
			Астрономия 
- 
			Кыргыз тили 
- 
			Оʻzbek tili 
 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			 
			