Free Pascal - char integer

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. :)

0

Nie jest.
Chodzi ci o takie sprawdzenie?

if (znak='2') and (wylosowana_liczba=2) then 
WriteLn('okreslony tekst');
 
0

Tak, chodzi właśnie o to.

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

0

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

1 użytkowników online, w tym zalogowanych: 0, gości: 1