Odpowiedzi

2009-11-16T17:58:07+01:00
Niewiem jak to zrobic z uzyciem funkcji isnumber.
ale w Pascalu bylo by to :

PROGRAM NAZWA;
USES CRT;
VAR
LICZBA:REAL;
BEGIN
WRITELN('PODAJ LICZBE');
READLN(LICZBA);
IF LICZBA>-5 THEN
BEGIN
IF LICZBA<10 THEN
BEGIN
WRITELN('POPRAWNE DANE');
END;
END;
REPEAR UNTIL KEYPRESSED;
END.

Moze to ci w czyms pomoze... ;]