CLR Console Application

[KaiseN]

Ребят, я всю голову сломала! Не знаю, как сделать!

Задание: разработать программу, которая вводит с клавиатуры одномерный массив целых чисел размерностью [25] элементов и выводит его на экран; производит расчет среднего арифметического элементов массива, изменяет указанный пользователем элемент и вновь производит расчет среднего арифметического элементов нового массива. Предусмотреть многократную возможность изменения элементов массива.

Не понимаю, как поменять элемент массива и заново посчитать среднее арифметическое.
Пока то, что есть:

#include "stdafx.h"
#define R 7

using namespace System;

void inputmas (int[R]);

void raschet(int [R]);

void zamena(int [R]);

int poisk_raschet(int [R]);

int poisk_zamena (int [R]);

void out_masscreen(int [R]);

int main(array<System::String ^> ^args)
{
int m[R];

wchar_t otvet;

while (1)

{Console::WriteLine("Работа с массивом целых чисел на 25 элементов");
Console::WriteLine("Вы можете");
Console::WriteLine("1.Ввести данные в массив");
Console::WriteLine("2.Работать с массивом");
Console::WriteLine("3.Завершить работу");
Console::WriteLine("Ваш выбор ->");


otvet=Convert::ToChar(Console::ReadLine());

switch (otvet)
{ case '1': inputmas(m);
    break;
case '2': raschet(m);
	break;
case '3': return 0;
}
}

Console::ReadLine();
return 0;
}

void out_masscreen(int m[R])
{ int i;
Console::WriteLine("\n\n Исходный массив");
for (i=0; i<R; i++)
Console::Write("{0,2}", m[i]);
}

void inputmas (int m[R])
{int i;
Console::WriteLine();
Console::WriteLine ("Ввод данных");
for (i=0; i<R; i++)
{ Console::Write ("m[{0}]=",i);
m[i]=Convert::ToInt32(Console::ReadLine());
}
}


void raschet (int m[R])
{ int  rez, zn;
wchar_t ans;

while (1)

{ Console::WriteLine();
	Console::WriteLine("Чего бы Вам хотелось выбрать?");
Console::WriteLine("1. Посчитать среднее арифметическое элементов массива");
Console::WriteLine("2. Посчитать среднее арифметическое элементов измененного массива ");
Console::WriteLine("3. Выход");
Console::WriteLine("Ваш выбор ->");
ans=Convert::ToChar(Console::ReadLine());

switch (ans)

{ case '1': rez=poisk_raschet(m);
out_masscreen(m);
Console::WriteLine("\n Среднее арифметическое элементов массива={0}", rez);
break;

case '2': zn=poisk_zamena(m);
	out_masscreen(m);
	Console::WriteLine("\n Какой элемент в массиве Вы хотели бы изменить?", zn);
	break;

case '3': return;
}
}
}


int poisk_raschet (int m[R])
{ int i, rez, sum=0;
{for (i=0; i<R; i++)
sum+=m[i];
}
rez=sum/7;
return rez;
}