[PASCAL] Richiesta inserimento password

[violentoweb]

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ù!

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.