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