Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Allora, io ho scritto questo programma che dovrebbe essere il gioco dell'impiccato (giocatore vs computer). Il computer sceglie una parola a caso fra 471 nasconde le lettere in mezzo e così via. Però non avevo voglia di riempire un vettore a mano, così ho pensato di fare un file di testo con le parole una a capo dell'altra e di fargli leggere il file e salvare ogni riga (quindi una parola) in un campo del vettore.
Però quando lo faccio partire dopo che gli inserisco il percorso del file (c:\parole.txt) lui mi dice
"program f:\impicc.exe
exited with
exit code = 201"
ho provato a cercare cosa fosse "exit code 201" ma non ho capito nulla...
Codice sorgente - presumibilmente Delphi
PROGRAM Impiccato;
uses crt;
Var i, j, k, k1, w, x, c :integer;
rand, lung, n_trat, riemp1, volte, cosino, casi :integer;
Ho provato il programma, e la lettura del file funziona.
L' errore "exit code 201" è dovuto ad un accesso fuori range ad un vettore.
Ecco cose dice la documentazione del Free Pascal:
Codice sorgente - presumibilmente Delphi
201 Range check error
If you compiled your programwith range checking on,then you can get this error in the following cases:
An array was accessed with an index outside its declared range.
Tryingto assign a value to a variable outside its range (for instance an enumerated type).
Ho notato alcune imprecisioni nel programma.
Alla riga 58, devi invertire l' ordine dei termini dell' uguaglianza, altrimenti perdi la parola da indovinare.
Alla riga 79 devi usare readln invece di read.
Il conteggio delle lettere indovinate va rivisto.
Ultima modifica effettuata da Poggi Marco il 12/11/2011 alle 10:38