Mój pierwszy post, mam nadzieję, że się nie zbłaźnię :)
Stworzyłem program-projekt na informatykę i pozostała mi tylko jego optymalizacja. Chcę, żeby był całkowicie idiotoodporny. Zostało mi jedno miejsce, z którym nie mogę sobie poradzić:
...
ile:byte;
...
ilepow:
g(1,2);
write('Ilość komórek na osobę: '); g(wherex-4,wherey);
{$-}
readln(ile);
if IORESULT<>0 then goto ilepow;
{$+}
Po prostu bardzo nie chcę, żeby głupi użytkownik/wredny nauczyciel mógł zawiesić program, wpisując ciąg znaków, zamiast liczby. W tym celu chcę cofnąć go jeszcze raz do readln, poprzednio wymazując błędny wpis (stąd te spacje po dwukropku i przekierowanie kursora do tyłu). Jednak program zarzuca mi exitcode 106.
PS: Program muszę oddać jutro. "g" to zdefiniowana przeze mnie procedura działająca, jak gotoxy (po co tyle pisać..).