Запишіть виконання наведеного фрагмента програми для табличної величини, значеннями елементів якої є числа: 0,5; -3; 2; -1,6. sum := 0;for i := 1 to 4 do sum := sum + a[i] * a[i];

15.81

Массив = 0,5; -3; 2; -1,6

sum := 0;

 for var i := 1 to 4 do

   sum := sum + arr[i] * arr[i];

~~~~~~~~~~

Итерация 1:

sum = 0 || arr[i] = 0.5

sum = 0 + 0.5 × 0 .5 = 0 + 0.25

sum = 0.25

~~~~~~~~~~

Итерация 2:

sum = 0.25 || arr[i] = -3

sum = 0.25 + (-3) × (-3) = 0.25 + 9

sum = 9.25

~~~~~~~~~~

Итерация 3:

sum = 9.25 || arr[i] = 2

sum = 9.25 + 2 × 2 = 9.25 + 4

sum = 13.25

~~~~~~~~~~

Итерация 4:

sum = 13.25 || arr[i] = -1.6

sum = 13.25 + (-1.6) × (-1.6) = 13.25 + 2.56

sum = 15.81

~~~~~~~~~~