Λύσεις 26ου ΠΔΠ Β' Φάση

Γενικά θέματα για το διαγωνισμό. Ερωτήσεις, προτάσεις και ό,τι άλλο ταιριάζει.
Απάντηση
rafgiav2
Δημοσιεύσεις: 2
Εγγραφή: Τρί Φεβ 11, 2014 4:35 pm

Λύσεις 26ου ΠΔΠ Β' Φάση

Δημοσίευση από rafgiav2 » Δευ Φεβ 24, 2014 8:43 pm

Όποιος θέλει ας ποστάρει τη λύση του εδώ.

ilpap
Δημοσιεύσεις: 6
Εγγραφή: Τρί Μαρ 04, 2014 12:26 pm

Re: Λύσεις 26ου ΠΔΠ Β' Φάση

Δημοσίευση από ilpap » Τρί Μαρ 04, 2014 12:38 pm

eimai kainourios ston programatismo (molis ton dekembrio proto arxisa) pistebw pws ayti i lisi einai swsti an kai dn eimai sigouros :)

Κώδικας: Επιλογή όλων

#include<fstream>
#define Nmax 1000000
using namespace std;
int K[Nmax];
bool posM[Nmax];
int main()
{
    ifstream solin;
    ofstream solout;
    int N;
    int M=-1;
    register int i;
    int test=-1;
    solin.open("solar.in",ios::in);
    solin>>N;
    for(i=0; i<N; ++i)
    {
            solin>>K[i]; 
            if (K[i]>test)
            {
                          posM[i]=true;
                          test=K[i];
            }
            else posM[i]=false;
    }
    test=1000001;
    for(i=N-1;i>=0;--i)
            if (K[i]<test)
            {
                          if (posM[i]==true) {M=K[i];break;}
                          test=K[i];
            }
    solout.open("solar.out",ios::out);
    if(M==-1) solout<<"NOT FOUND"<<'\n';
    else solout<<M<<'\n';
    solin.close();
    solout.close();
    return(0);    
}

dimitrists
Δημοσιεύσεις: 5
Εγγραφή: Πέμ Ιουν 13, 2013 8:39 pm

Re: Λύσεις 26ου ΠΔΠ Β' Φάση

Δημοσίευση από dimitrists » Κυρ Μαρ 09, 2014 5:22 pm

Αυτός ειναι ο κώδικάς μου... Συνολικός χρονος για ολα τα testcase 2.1 s και βαθμολογια 100/100 :D :D :D

Πρωτα διαβαζω το αρχειο και σημειωνω το max απο την αρχη μεχρι το προηγουμενο στοιχειο.
Μετα τρεχω αναποδα τον πινακα μεχρι να συναντησω στοιχειο που πληροι τις προυποθεσεις.

[pastebin]http://pastebin.com/EaFwYr9S[/pastebin]

ilpap
Δημοσιεύσεις: 6
Εγγραφή: Τρί Μαρ 04, 2014 12:26 pm

Re: Λύσεις 26ου ΠΔΠ Β' Φάση

Δημοσίευση από ilpap » Κυρ Μαρ 16, 2014 1:51 pm

panw katw to idio ekana (kai egw 100/100) me 1.8 sec

Απάντηση