Предмет: Информатика, автор: lenyayulya

ПОМОГИТЕ, ПОЖАЛУЙСТА!!!
Составить программы для решении задач (Python)

Задача 1
Создать список на 10 случайных чисел от 1 до 10.
Найти разность между наибольшим и наименьшим элементами списка.
пример
5 и 2 разница: 3
5 и -2 разница: 7
-5 и -2 разница: 3
(Разница по модулю)
abs - функция абсолютного значения

Задача 2
Создать список на 10 случайных чисел от 1 до 10.
Найти расстояние между расположением наибольшего и наименьшего элементов списка (разница номеров).

Ответы

Автор ответа: hitriy33
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.

Объяснение:


lenyayulya: Программа пишет, что ошибка
Похожие вопросы