Question

(Pascal) Дан массив целых чисел из 8 элементов. Найти сумму квадратов последних шести элементов

Answer 1

Фрагмент кода, в котором осуществляется расчет. Не забудь объявить массив и переменную для суммы и индекса. Удачи.
Sum:=0;
For i := n downto n-6 do
Begin
   sum:= sum + arr[i];
End;