Дан массив из семи элементов.Написать программу,подсчитывающую среднее арифметическое второго и предпоследнего элементов массива

1

Ответы и объяснения

2013-12-19T21:34:02+04:00
Var
a:array [1..7] of integer;
i:integer;
begin
 for i:=1 to 7 do   
  readln(a[i]);
writeln((a[2]+a[7])/2);
end.

P.S. Надеюсь на "Лучший ответ"


Дан целочисленный массив из 10 элементов.Написать программу ,находящую сумму элементов массива кратных 3 или 5?
Это уже другой вопрос.
Ах да и поставь лучший ответ