Задать массив a(n) элементы которого являются членами ряда a(i) =i^3 не большими наперед заданного числа м> =1000 найти среднее значение элементов массива
Const n =9; // Задаем кол-во элементов в массиве var i,sred:integer; a:array[1..n] of integer; begin for i:=1 to n do begin if i*i*i = 1000 then break; a[i]:= i*i*i; sred:=sred+a[i]; end; writeln('Среднее значение элементов = ', sred/n); end.
Пусть *(n) - число звёздочек, которое выведет процедура f(n).
Так как f(n) всегда выводит 1 звёздочку, а если если n > 2 - то вызывает f(n - 1) и f(n - 2), то *(n) = 1 при n <= 2 *(n) = 1 + *(n - 1) + *(n - 2) при n > 2.
Пусть *(n) - число звёздочек, которое выведет процедура f(n).
Так как f(n) всегда выводит 1 звёздочку, а если если n > 2 - то вызывает f(n - 1) и f(n - 2), то *(n) = 1 при n <= 2 *(n) = 1 + *(n - 1) + *(n - 2) при n > 2.
var
i,sred:integer;
a:array[1..n] of integer;
begin
for i:=1 to n do begin
if i*i*i = 1000 then break;
a[i]:= i*i*i;
sred:=sred+a[i];
end;
writeln('Среднее значение элементов = ', sred/n);
end.