Дан одномерный массив, содержащий N элементов. Составьте алгоритм и программу, вып

Дан одномерный массив, содержащий N элементов. Составьте алгоритм и программу, выполняющие следующие действия: упорядочение элементов массива по возрастанию; вычисление суммы A[1] + A[2]*A[2] + A[3]*A[3] …; Например:N = 5;Числа: 4,1,3,2,5
Гость
Ответ(ы) на вопрос:
Гость
// PascalABC.NET 3.2, сборка 1325 от 19.10.2016 begin   var n:=ReadInteger('n=');   var a:=ReadArrInteger('Вводите элементы:',n);   a.Sort;   a.Println;   var s:=a[0]+a[n-1];   for var i:=1 to n-2 do s:=s+sqr(a[i]);   Writeln('S=',s) end. Пример n= 5 Вводите элементы: 4 1 3 2 5 1 2 3 4 5 S=35
Не нашли ответ?
Ответить на вопрос
Похожие вопросы