Помогите решить задачу в lazarus. Задан числовой массив а (n). Вычислить сумму произведений всех троек соседних чисел.
По дате
По рейтингу
Sum := 0; for i := 1 to n-2 do Sum := a[ i]*a[ i+1]*a[ i+2];
Видео по теме
Sum := 0; for i := 1 to n-2 do Sum := a[ i]*a[ i+1]*a[ i+2];