Запишите программу вычисления среднего арифмитического и количества членов последовательности в зависимости от заданого значения n 11,22,33,44,55,...2n.
Без массивов.
Var s,n,i,sum:integer;sr:real;beginwrite(Введите число n);Readln(n);writeln(s =);for i:= 1 to n dobegin s := i * 11;sum:= sum +s;write(s:4);end;sr:= sum/n;writeln;writeln(sr =, sr);end.
Оцени ответ
