PDA

Visualizza la versione completa : [PASCAL] Richiesta inserimento password


violentoweb
30-03-2010, 14:50
ragazzi, ma mi dite cosa c'è di sbagliato in questo cavolo di codice???

program password;
uses crt;
var parola:string[10];
begin
writeln('Inserisci la password');
if parola=prova then writeln('Password corretta');
else
begin
writeln('Sbagliato');
end;
readln;
end.

Perchè non me lo compila! :dhò: :dhò:

123delphi321
30-03-2010, 15:27
forse...


if parola='prova' then writeln('Password corretta');


non conosco bene il pascal ma non e' che la readln deve essere fatta prima?


program password;
uses crt;
var parola:string[10];
begin
writeln('Inserisci la password');
readln;

if parola='prova' then
writeln('Password corretta')
else
writeln('Sbagliato');

end.

king64
30-03-2010, 18:46
program password;
uses crt;
var parola:string[10];
begin
writeln('Inserisci la password');
readln(parola);
if parola='prova' then
writeln('Password corretta')
else
writeln('Sbagliato');
end.

Saluti :ciauz:

violentoweb
30-03-2010, 20:25
Originariamente inviato da king64


program password;
uses crt;
var parola:string[10];
begin
writeln('Inserisci la password');
readln(parola);
if parola='prova' then
writeln('Password corretta')
else
writeln('Sbagliato');
end.

Saluti :ciauz:

king esatto... grazie mille.. sono alle basi e vorrei imparare a programmare dal pascal.. se qualcuno di voi sa indicarmi la strada giusta vi ringrazio!! A questo codice adesso sarebbe possibile aggiungere quando sbagliano di riprovarci per 3 volte e alla 4 si blocca?

king64
30-03-2010, 21:13
program password;
uses crt;
var parola:string[10];
var tentativo:integer;
var flag:boolean;
begin
flag:=FALSE;
tentativo:=0;
while (not(flag)) and (tentativo<4) do
begin
writeln('Inserisci la password');
readln(parola);
if parola='prova' then
begin
writeln('Password corretta');
flag:=TRUE
end
else
begin
writeln('Sbagliato');
tentativo:=tentativo+1;
end;
end;
if not (flag) then
writeln('Input bloccato');
readln;
end.


Saluti :ciauz:

violentoweb
30-03-2010, 21:18
Originariamente inviato da king64


program password;
uses crt;
var parola:string[10];
var tentativo:integer;
var flag:boolean;
begin
flag:=FALSE;
tentativo:=0;
while (not(flag)) and (tentativo<4) do
begin
writeln('Inserisci la password');
readln(parola);
if parola='prova' then
begin
writeln('Password corretta');
flag:=TRUE
end
else
begin
writeln('Sbagliato');
tentativo:=tentativo+1;
end;
end;
if not (flag) then
writeln('Input bloccato');
readln;
end.


Saluti :ciauz:

sei molto bravo... complimenti! Sai indicarmi qualche buona guida da seguire oppure degli ottimi consigli per imparare ad usare bene il pascal?

violentoweb
30-03-2010, 23:03
Originariamente inviato da violentoweb
sei molto bravo... complimenti! Sai indicarmi qualche buona guida da seguire oppure degli ottimi consigli per imparare ad usare bene il pascal?

qui per esempio ke sbaglio? Uffff nn ne posso più! :cry: :dhò:



PROGRAM numeri_casuali;
USES crt;
VAR a,b,c:INTEGER;
BEGIN CLRSCR; RANDOMIZE;
c:=RANDOM(10);
CASE c OF
7:BEGIN WRITELN(' Il numero è ',c);
END;
9:BEGIN WRITELN(' Il numero è ',c);
END;
3:BEGIN WRITELN(' Il numero è ',c);
END
ELSE
BEGIN
WRITELN(' Il numero uscito è diverso da 3 7 e 9);
END;
END.

123delphi321
31-03-2010, 08:13
violentoweb, sbagli la sintassi. in questo caso, devi capire la sintassi del comando 'case', se tu avessi cercato su google 'pascal case' certamente avresti capito la soluzione in maniera più veloce di quanto scrivere sul forum.

leggi qui.

http://www.pierotofy.it/pages/guide/Guida_Pascal/La_struttura_CasedotdotdotofdotdotdotElse/


http://www.pierotofy.it/pages/guide/Guida_Pascal/

ciao

alka
31-03-2010, 10:14
violentoweb, non si può utilizzare il forum per far compilare e correggere ad altri ogni singolo errore logico o di sintassi del proprio programma, anche del più banale, perché si inizia a utilizzare il linguaggio prima di approfondirne i fondamenti.

Suggerisco di acquisire un po' di documentazione (basta una ricerca su Google per trovare un'infinità di materiale) e, solo dopo aver compreso l'utilizzo delle parole chiavi e delle strutture principali, iniziare a programmare; in caso di problemi insormontabili, puoi rivolgerti al forum per esporli, ma devi indicare anche l'errore che ottieni e, in ogni caso, il forum rappresenta l'ultima risorsa (o meglio, il tentativo di risolvere l'errore devi farlo tu, senza rivolgerti al forum alla prima necessità, e se non riesci spiega il perché, senza limitarti a postare il codice che altri dovranno leggere, comprendere, compilare, correggere e poi spiegarti, poiché il forum non è un luogo dedicato ai corsi online e all'affiancamento continuo nell'apprendimento di un linguaggio).

In ultimo, suggerisco anche la lettura del Regolamento (http://forum.html.it/forum/showthread.php?s=&threadid=973887) per conoscere le modalità di partecipazione (ad esempio, i titoli delle discussioni devono essere rappresentativi).

Ciao! :ciauz:

Loading