7.2.. Učitati dva broj i izračunati recipročnu vrijednost većeg i ispisati je.

Opis rješenja: Provjera se izvodi naredbom IF a > b THEN. Ako je a veće izračunava se njegova recipročna vrijednosti inače se izračunava recipročna vrijednost b. Nema testa za a = b ali je nije bitno jer će se izračunati recipročna vrijednost.

Listing programa:

REM P07211030
CLS
PRINT "Dva broja:"
INPUT a,b
IF a>b THEN max=a ELSE max=b
z=1/max
PRINT "Reciprocna vrijednost veceg je:"; z
END

Ispis na ekranu:

Index