Почему выводится неправильное значение в textbox?

[Tat0107]

Программа неправильно считает ср. арифм положит элементов массива и индекс ближайшего к ср арифм элемента.

#pragma endregion

	private: System::Void cmdTask_Click(System::Object^  sender, System::EventArgs^  e) 
			 {
				 const int N = 100;
				 int mas1[N], mas2[N];
				 int n1, n2;
				 int a, b;
				
				 int ind;
				 float sr;
			
				
				 txtSr->Text=sr.ToString();
				 txtInd->Text=ind.ToString();
				 lstMas1->Items->Clear();
				 lstMas2->Items->Clear();
				
				 if(!GetInt(N,txtN,"Введите число эл-тов массива 1<=n<=100",n1))return;
				 if(!GetInt(10000,txtB,"Введите b-конеч. знач. отрезка 1<=b<=10000",b))return;
				 if(!GetInt(b,txtA,"Введите a-нач. знач. отрезка 1<=a<=b",a))return;
				

				 input(mas1, n1, a, b);
				 output(mas1,n1, lstMas1);
				 
				 n2=task(n1,mas1,mas2,sr,ind);
				 if(n2)
					 output(mas2, n2, lstMas2);
				 else
					 MessageBox::Show("Наиболее близкий к ср. арифм. элемент находится во второй половине массива", "Сообщение",MessageBoxButtons::OK,MessageBoxIcon::Information);

}

			 private: System::Void cmdExit_Click(System::Object^  sender, System::EventArgs^  e) 
					  {
						   this->Close();
					  }

};
}

//Файл GetPut.cpp с функциями ввода и вывода
#include "stdafx.h"

//Функция формирования массива из n случайных целых чисел диапазона [a, b]
void input(int mas[], int n, int a, int b)
{
	Random^ rnd = gcnew Random;//создание объекта типа random
	for (int i = 0; i < n; i++)//цикл заполнения массива
		//Генерация случ. значений в диапазоне от a до b
		mas[i] = rnd->Next(a, b);
}

//Функция вывода массива в ListBox
void output(int mas[], int n, ListBox^ Lb)
{
	Lb->Items->Clear();
	for (int i = 0; i < n; i++)
	{
		String^ s = mas[i].ToString();
		Lb->Items->Add(s);
	}
	if(!n) Lb->Items->Add("Массив пуст");
}





//Функция ввода целого числа с контролем непустого текстового поля 
//и нахождения числа в отрезке [1;MaxVal]
bool GetInt(const int MaxVal, TextBox^ Tx, String^ s, int& x)
{
	if(Tx->Text->Length == 0) //если текст. поле пусто
	{
		MessageBox::Show(s, "Ошибка ввода", MessageBoxButtons::OK,MessageBoxIcon::Error);
		Tx->Focus();
		return false;
	}
	x = Convert::ToInt32(Tx->Text);
	
	if( x > MaxVal) //если х выходит за допустимые границы
	{
		MessageBox::Show(s, "Ошибка ввода", MessageBoxButtons::OK, MessageBoxIcon::Error);
		Tx->Focus();
		return false;
	}
	return true;
}

//файл task.cpp с функциями решения задачи 
#include "stdafx.h"
#include <cmath>


bool simple (int n,int mas[],float& sr, int& ind)
 {
        int i,k;
		int sum=0,s,min;
		for (int i=0;i<n;i++)
				//if (n>0 && abs(sr-mas[i]<s)) 
			if (mas[i]>0) //  
			    {sum+=mas[i]; k++;}
			sr=sum/k;
			min= abs(sr-mas[0]);ind=0;
			for (int i=1;i<n;i++)	
			{
				s=abs(sr-mas[i]);
				if(s<min) {min=s; ind=i;}
			}
			if (ind<n/2)
		         return true;
			return false;
			

  }			

int task(int n,int mas[] ,int newmas[] ,float& sr, int& ind)
{
	//float sr;
	//int i,ind;
	int k=0;
	if(simple(n,mas,sr,ind)==false) return 0;
	for(int i=0;i<n;i++)
		if(mas[i]>0 && ind<n/2 )
		{
			newmas[k]=mas[i];
			k++;
		}
		return k;
}

[FrosyaZZ]

sum/k

целочисленное деление

[Tat0107]

Сообщение от FrosyaZZ

sum/k

целочисленное деление

а как исправить? С индексом что тогда не так? Индекс вообще миллионное число выдает