К произведению первых 5 чисел прибавить сумму 10 последних элементов массива - Turbo Pascal

Формулировка задачи:

Дан массив и 12 целых чисел. К произведению первых 5 чисел прибавить сумму 10 последних элементов массива.


textual

Код к задаче: «К произведению первых 5 чисел прибавить сумму 10 последних элементов массива - Turbo Pascal»

s:=0; p:=1
for i:=1 to 12 do
begin
  if i in [1..5] then p:=p*a[i];
  if i in [3..12] then s:=s+a[i];
end;
s:=s:+p;
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

14   голосов, оценка 3.714 из 5

Источник