7.2.. Sa tastature upisati broj i izračunati njegovu recipročnu vrijednost (y = 1 / x) i ispisati je. Ako je x=0 ispisati Dijeljenje sa nulom ispisati "Dijeljenje sa nulom".

Opis rješenja: Recipročna vrijednost broja je 1 podijeljen sa upisanim brojem. Međutim u slučaju da je upisani broj jednak nuli trebalo bi se dijeliti sa nulom, a dijeljenje je nemoguće. Proizilazi da u odnosu na vrijednost upisanog broja postoje dvije akcije (obrade). Izbor se izvodi na osnovu logičkog izraza n=0, korištenjem razgranate strukture tipa IF THEN ELSE. Za vrijednosti n <> 0 izračunava se recipročna vrijednost (dio  iza THEN), dok se za n = 0 ispisuje da je dijeljenje nemoguće.

Opis programa: Logički izraz za provjeru da li je upisani broj jednak nuli je (n=0). Ako je logički izraz istinit tada se ispisuje "Dijeljenje sa nulom je nemoguce". Inače se ispisuje "Recipročna vrijednost je " kao i izračunata recipročna vrijednost."

Listing programa:

1 REM BAS07211009
10 PRINT "Broj ";
20 INPUT x
30 IF x = 0 THEN PRINT "Dijeljenje sa nulom je nemoguce";  ELSE PRINT "Reciprocna vrijednost je"; 1 / x
40 END

Izvođenje programa:

Index