Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Pascal - il compilatore mi da errore
Forum - Pascal - il compilatore mi da errore

Avatar
Parma98 (Normal User)
Newbie


Messaggi: 6
Iscritto: 11/01/2013

Segnala al moderatore
Postato alle 18:27
Venerdì, 11/01/2013
ciao a tutti.
sono nuovo del forum ed è la prima volta che scrivo qui.
volevo chiedere se qualcuno sa come risolvere questo problema.
il compilatore mi da errore e mi dice:Syntax error, . expected but then found.
ecco il codice:
Codice sorgente - presumibilmente Delphi

  1. program Password;
  2. uses crt;
  3. var parola:string;
  4.  
  5. begin
  6.         clrscr;
  7.         writeln('immettere la password: ');
  8.         readln(parola);
  9.         if parola=password then
  10.         writeln('Bravo!');
  11.         else
  12. begin
  13.        textcolor(5);
  14.        textbackground(15);
  15.        writeln('Sbagliato');
  16.        end;
  17.        readln
  18. end.



spero che qualcuno sappia aiutarmi.
grazie :hail:
      


PM Quote
Avatar
Poggi Marco (Member)
Guru


Messaggi: 969
Iscritto: 05/01/2010

Segnala al moderatore
Postato alle 19:21
Venerdì, 11/01/2013
Ciao!

Il programma non funziona perché confronta la stringa parola con li nome del programma (password).

PM Quote
Avatar
Parma98 (Normal User)
Newbie


Messaggi: 6
Iscritto: 11/01/2013

Segnala al moderatore
Postato alle 19:41
Venerdì, 11/01/2013
Ok quindi dovrei cambiare il 'titolo' del progetto...
Comunque non riesco a capire perché si ostina a
Dirmi che prima di 'then' ci vuole un punto.
:-?

PM Quote
Avatar
Phi (Member)
Expert


Messaggi: 241
Iscritto: 30/12/2009

Segnala al moderatore
Postato alle 22:32
Venerdì, 11/01/2013
Gli errori sono 2:
* se voi verificare che l'utente abbia digitato password allora password fa inserito fra virgolette -> if parola='password' then
* prima di un else non va messo il punto e virgola -> writeln('Bravo!')
else[\code]

Ultima modifica effettuata da Phi il 11/01/2013 alle 22:33
PM Quote
Avatar
Parma98 (Normal User)
Newbie


Messaggi: 6
Iscritto: 11/01/2013

Segnala al moderatore
Postato alle 7:01
Sabato, 12/01/2013
Grazie oggi pomeriggio proverò se non va
Chiederò ciao:heehee:

PM Quote