сформироват массив из 18 чисел каждый из которых равен своему порядковому номеру с противоположным знаком сложенное числом 50 найти среднее арифметическое элементов с 1 по10 включительно

Question

Iunia

Информатика

26 октября, 21:36

сформироват массив из 18 чисел каждый из которых равен своему порядковому номеру с противоположным знаком сложенное числом 50 найти среднее арифметическое элементов с 1 по10 включительно

+5

Ответы (1)

Знаешь ответ на этот вопрос?

Савелий Белов · Answer 1

const N=18;

var a:array[1 ... N] of integer; x, i:integer;

begin

x:=0;

for i:=1 to N do begin

a[i]:=-1*i+50;

writeln (a[i])

end;

for i:=1 to 10 do

x:=x+a[i];

writeln (x/10)

end.