Reikšmės pašalinimas iš masyvo(nelabai daeina)

[sheat0n]

#include <iostream>
#include <fstream>
using namespace std;
const char CDfv[] = "duom.txt";
const char CRfv[] = "ats.txt";
const int Max = 10;
void Skaitymas(const char fv[], int &n, int A[]);
void Rasymas(const char fv[], int n, int A[]);
void Pakeitimas(int n, int A[]);

int main(){
    int n, mas[Max];
    Skaitymas(CDfv, n, mas);
    Rasymas(CRfv, n, mas);
    Pakeitimas(n, mas);
    return 0;
}

void Skaitymas(const char fv[], int &n, int A[]){
    ifstream fd(fv);
    fd >> n;
    for(int i = 0; i < n; i++){
        fd >> A[i];
    }
    fd.close();
}
void Rasymas(const char fv[], int n, int A[]){
    for(int i = 0; i < n; i++){
        A[i];
    }
}
void Pakeitimas(int n, int A[]){
    for(int i = 0; i < n; i++){
        for(int j = i+1; j < n; j++){
            if(A[i] == A[j]){
                A[i]=A[i+1];
                  n--;
            }
        }
    }
    for(int i = 0; i < n; i++){
        cout << A[i] << " ";
    }
}

Žodžiu reikia pašalinti iš masyvo pasikartojančias reikšmes, pasikartojančias reiškmes randu, bet nelabai gaunasi pašalinti jas iš masyvo, gal jeigu nesunku galit paaiškinti, ką blogai darau?(Čia kokį ats gaunu:http://prntscr.com/5mjwhm , duomenų failas: http://prntscr.com/5mjwmb) 

Redaguota Gruodžio 30, 2014, nario sheat0n

[Virsenas]

Aš pavyzdžiui matau tik skaičių 4, kuris pasikartoja vieną kartą. O iš kur tie 8 ir 9 ? Nuskaitymas blogas reiškias.

[sheat0n]

Aš pavyzdžiui matau tik skaičių 4, kuris pasikartoja vieną kartą. O iš kur tie 8 ir 9 ? Nuskaitymas blogas reiškias.

blm ne ta duomenų failą nufotkinau.. Čia tikras duomenų failas: http://prntscr.com/5mkw1q

[Virsenas]

Du penketai yra, bet programa kažkodėl nenuskaito. Painus kodas čia pas tave. Siūlyčiau peržiūrėt visą kodą ir bandyt surast klaidas, arba daryt kodą iš naujo.

[sheat0n]

Du penketai yra, bet programa kažkodėl nenuskaito. Painus kodas čia pas tave. Siūlyčiau peržiūrėt visą kodą ir bandyt surast klaidas, arba daryt kodą iš naujo.

Vienodus skaičius viska suranda: http://prntscr.com/5ml2fk , tik nemoku pašalinti jų iš masyvo, niekaip nesigauna

Niekas idėjų neturit kaip spręst?