Mam problem z Repeat a raczej jej końcówką.
repeat
Write('Podaj sposob zaplaty (gotowka/kredyt): ');
readln(sposob_oplaty);
until Upcase(sposob_oplaty) in ('GOTOWKA','KREDYT','GOTóWKA');
Dlaczego nie mogę skompilować w obecnej wersji ? Chciałbym żeby użytkownik podawał zmienną aż uzyskam KREDYT, GOTOWKA, GOTÓWKA, lub z małej litery. A tu wywala błąd. Error: Ordinal expression expected
Działam na FPC oraz standardowym kompilatorze.