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