Podgląd pojedynczego posta
Stary 20.02.2006, 18:46   #13
pawelblu
Recydywista - Wielokrotny
Zlotowicz
CDRinfo VIP
 
Avatar użytkownika pawelblu
 
Data rejestracji: 17.01.2003
Lokalizacja: Wawa
Posty: 5,265
pawelblu niedługo stanie się sławny ;) <50 - 149 pkt>pawelblu niedługo stanie się sławny ;) <50 - 149 pkt>
Trzeba przyznac ze to jeden z najladniej napisanych kodow jakie ostatnio widzialem, niestety przez to jest dosc duzy :/ (2200 na taka funkcjonalnosc to jednak troche jest).

Uzywasz funkcji val - w pascalu jest taka funkcja ord ktora zwraca ASCII znaku, wiec ord(znak) - 48 daje Ci cyfre. Jak ord(znak) < 48 lub > 57 to znak nie jest cyfra.

ord = chr^(-1)
pawelblu jest offline   Odpowiedz cytując ten post