7.2.. Napisati program za ispis tri polovine korijena broja (3/2 korijena broja) ako je moguće inače ispisati 'Nedefinisan'.

REM 07211001;
INPUT "Broj = "; x
IF x >= 0 THEN
    y = (3 / 2) * SQR(x)
    PRINT "Rezultat:"; y
ELSE
    PRINT "Nedefinisan"
END IF
END

Ispis na ekranu:

Index