Pascal - caratteri

[leadergl]

si ma così non potrai mai avere tutte le lettere!!!!

ad esempio la N ?!? che numero ci vuole per rappresentarla?

[DarkSiDE]

Originariamente inviato da leadergl
si ma così non potrai mai avere tutte le lettere!!!!

ad esempio la N ?!? che numero ci vuole per rappresentarla?

la traccia parla chiaro
le lettere da a ad i, ovvero da 0 a 9, ho impropriomente messo anche le altre lettere, effettivamente

[leadergl]

poi...invece di creare quel casino potevi usare la funzione CHR che praticamente inserito un numero ti restituisce il corrispondente in stringa.....l'inverso di ORD per capirci !!!!

Quindi sapendo che A=65 potevi fare:

TuaLettera:=CHR(TuoNumero+64);

ovviamente anche così avresti escluso tutte le lettere dalla L=10 alla Z.......senza contare che non prenderesti in considerazione le minuscole.....in quando a=97 !!!!

rimanendo nel tuo esempio, avresti potuto fare:

   count:=length(parametro);
   for i:=1 to count do
       begin
            val(parametro[i],simbolo,temp);
            write( CHR(simbolo+64))
       end;

ovviamente ci sono piccole correzioni al codice ma credo che così sia più bello!!

Cmq va bene anche il tuo, solo che come ti ho detto dalla I in poi è tutto escluso

[leadergl]

questo è il codice leggermente modificato