Free Pascal - char integer

Free Pascal - char integer
MA
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 2
0

Mam pytanie jak zrobić by CHAR z którego używam trzy opcje w programie (numery 1,2,3), połączyć z losową liczbą z INTEGER (też numery od 1 do 3), tak gdy wybiorę np. cyfrę 2 po czym wylosuje mi się też cyfra 2, to na podstawie tego pojawi się określony tekst. (?)

Mam nadzieję że jest to w miarę zrozumiałe. :)

szopenfx
  • Rejestracja: dni
  • Ostatnio: dni
0

Nie jest.
Chodzi ci o takie sprawdzenie?

Kopiuj
if (znak='2') and (wylosowana_liczba=2) then 
WriteLn('okreslony tekst');
 
MA
  • Rejestracja: dni
  • Ostatnio: dni
  • Postów: 2
0

Tak, chodzi właśnie o to.

Tylko że pojawia się błąd:
"Incompatible types: got "Char" expected "LongInt"

_13th_Dragon
  • Rejestracja: dni
  • Ostatnio: dni
0

A może jednak o to ci chodzi: if Ord('2')-Ord('0')=wylosowana_liczba then WriteLn('okreslony tekst 2');

Zarejestruj się i dołącz do największej społeczności programistów w Polsce.

Otrzymaj wsparcie, dziel się wiedzą i rozwijaj swoje umiejętności z najlepszymi.