Дан массив A размера N. Сформировать новый массив B того же размера по следующему правилу:

@2k7fakel · Регистрация: 26.10.2012

Студворк — интернет-сервис помощи студентам

1. Дан массив A размера N. Сформировать новый массив B того же размера по следующему правилу: элемент BK равен среднему арифметическому элементов массива A с номерами от 1 до K.
заранее спасибо

@КонецСвета · 08.11.2012, 14:33

Pascal

uses crt;
const nmax=100;
var a: array [1..nmax] of integer;
    b: array [1..nmax] of real;
    n,i,j: byte;
 
begin
repeat
write('Количество элементов, не более ',nmax,', n='); readln(n);
until n in [1..nmax];
writeln('Исходный массив');
for i:=1 to n do
    begin
    a[i]:=random(199)-99;
    write(a[i]:5);
    for j:=1 to i do
        b[i]:=b[i]+a[j];
    b[i]:=b[i]/i;
    end;
writeln;
writeln('Преобразованный массив');
for i:=1 to n do
    write(b[i]:5:1);
end.

@2k7fakel 0 / 0 / 0 Регистрация: 26.10.2012 Сообщений: 22
		1
	Дан массив A размера N. Сформировать новый массив B того же размера по следующему правилу: 08.11.2012, 02:15. Показов 2109. Ответов 1 Метки нет (Все метки) 1. Дан массив A размера N. Сформировать новый массив B того же размера по следующему правилу: элемент BK равен среднему арифметическому элементов массива A с номерами от 1 до K. заранее спасибо 0

	08.11.2012, 14:33

Опции темы

Дан массив A размера N. Сформировать новый массив B того же размера по следующему правилу:

Решение