esercitazioni con Turbo Basic
esci turboba.htm
funzioni logiche
REM alto3
REM uso di operatori logici EQV
CLS
h$ =
"--------------------------------------------------"
a = 5: b = 10
PRINT a, b, "c1 EQV c2 a=5 EQV b=15"
IF a = 5 EQV b = 15 THEN PRINT "falso perche' solo una
condizione vera"
PRINT h$
PRINT a, b, "c1 EQV c2 a=16 EQV b<20"
IF a = 16 EQV b < 20 THEN PRINT "falso perche' solo una
condizione vera"
PRINT h$
PRINT a, b, "c1 EQV c2 a=5 EQV b=10"
IF (a = 5) EQV (b = 10) THEN PRINT "vero perche' entrambe
condizioni vere"
PRINT "vero perche' entrambe condizioni vere"
PRINT h$
PRINT a, b, "c1 EQV c2 a=8 EQV b=15"
IF a = 8 EQV b = 15 THEN PRINT "vero perche' nessuna
condizione vera"
PRINT "vero perche entrambe condizioni false"
PRINT h$
END