3. Дана последовательность из 100 чисел a1, ..., an, где при i=1,2 ..., n значение ai = 3*i; a) Найти сумму элементов последовательности; b) Найти среднее по всем элементам последовательности.

Question

Информатика

Вераня

16 сентября, 02:14

3. Дана последовательность из 100 чисел a1, ..., an, где при i=1,2 ..., n значение ai = 3*i; a) Найти сумму элементов последовательности; b) Найти среднее по всем элементам последовательности.

+2

Ответы (1)

Знаете ответ?

Вовуся · Answer 1

Program z1; const n = 100; Var a: array [1 ... n] of integer; i, s:integer; sz:real; Begin for i:=1 to n do begin a[i]:=3*i; write (a[i],' ') ; end; s:=0; for i:=1 to n do s:=s+a[i]; sz:=s/n; writeln; writeln ('A) ', s) ; writeln ('B) ', sz) ;

End.