V <- 1:0 for(P in V) for(Q in V) for(R in V) print(c( P,Q,R, P|Q&R,(P|Q)&R,P|(Q&R) )) # # Alternativa, più sofisticata, in cui uso 'cat' per concatenare le uscite e # 'sep' per separle col tabulatore, '\t', e scrivo TRUE, FALSE invece di 1, 0: V <- c(TRUE, FALSE) { cat('P','Q','R', '->', 'P|Q&R','(P|Q)&R','P|(Q&R)', '\n', sep='\t' ); for(P in V) for(Q in V) for(R in V) cat(P,Q,R, '->', P|Q&R,(P|Q)&R,P|(Q&R),'\n',sep='\t' ) }