Одномерный массив что я делаю не так

[Fox-mts]

вот такая работа:
В одномерном массиве, состоящем из n целых элементов, вычислить:
1) минимальный по модулю элемент массива;
2) сумму модулей элементов массива, расположенных после первого элемента, рав-ного нулю
вот моя программа(делал в Visual Studio 2005):

#include "stdafx.h"
#include "iostream"
using namespace std;
int _tmain(int argc, _TCHAR* argv[])
{  setlocale (0,"rus");
        int i,n, sum;
        cout<<"Введите количество элементов в массиве:\n";
        cin>>n;
        float *a=new float [n];
        cout<<"Введите 1 элемент массива: ";
        cin>>a[0];
        float min=a[0];
        for (i=2; i<=n; i++) 
        {       
                cout<<"Введите "<<i<<" элемент массива: ";
                cin>>a[i];
                if (a[i]<min) 
                {
                min=a[i];
                }
        }
        cout<<"Минимальный элемент:\n"<<min;

		for (i=0,sum=0;i<n; i++)
		
			sum+=a[n];

		cout <<"Сумма элементов:\n" << sum ; 
		       system ("pause");
       
		  
	return 0;
}

проблема такая: он не правильно считает сумму элементов, почему? хотелось бы знать...

[Bearw08]

#include <iostream>
#include <cstdlib>
using namespace std;
int main()
{
int n,sum = 0,nullNum = -1;

cout << "Введите количество элементов в массиве:\n";
cin >> n;
int *a = new int[n];
cout << "ВВедите 1 элемент массива:\n";
cin >> a[0];
int min =  abs(a[0]);

for (int i = 1; i < n; i++)
{
    cout << "Введите " << i + 1 <<" элемент массива: ";
    cin >> a[i];

    if (abs(a[i]) < abs(min))
        min = abs(a[i]);
    if(a[i] == 0 && nullNum == -1) nullNum = i;



}
cout<<"минимальный элемент по модулю равен: "<< min <<endl;

if(nullNum != -1)
    for(int i = nullNum;i < n; i++)
        sum+=abs(a[i]);


cout <<"Сумма элементов:\n" << sum ;
return 0;
}

[p51x]

sum+=a[n];

1. А потому что не надо к сумме прибавлять только один элемент постоянно. У вас счетчик цикла кто?
2. Прочтите условие - у вас не просто "найти сумму всех элементов"

[pashqa]

А не могли бы вы помочь с этой же задачей,только переделать ее на Паскаль? буду очень признателен