Дан одномерный массив, содержащий N элементов. Составьте алгоритм и программу, выполняющие следующие действия: упорядочение элементов массива по возрастанию; вычисление суммы A[1] + A[2]*A[2] + A[3]*A[3] …;Например:N = 5;Числ...
Дан одномерный массив, содержащий 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
Не нашли ответ?
Похожие вопросы