F90: Tabela verdade do OU
From AdonaiMedrado.Pro.Br
Revision as of 02:44, 3 November 2008 by Adonaimedrado (Talk | contribs)
PROGRAM aula LOGICAL :: l1, l2 l1=.TRUE. l2=.TRUE. WRITE (*,*) "T ou T =", l1 .OR. l2 WRITE (*,*) "T ou F =", l1 .OR. .NOT. l2 WRITE (*,*) "F ou T =", .NOT. l1 .OR. l2 WRITE (*,*) "F ou F =", .NOT. l1 .OR. .NOT. l2 END PROGRAM aula