Дан массив целых чисел от 1 до n, пусть n=15. Вычислить сумму элементов с 1 по 12, и с 8 по 15, а также найти произведения этих сумм.

// сам объяви переменные , это основа программыfor i:=1 to n-3 do k:=k+a[i];for i:=8 to n dom:=m+a[i];writeln(k*m);