(1) if(!(x >= 0 | floor(x)==x)) (2) if(!(x >= 0 & floor(x)!=x)) (3) if(x<0 | floor(x)!=x) (4) if(x<0 & floor(x)!=x)		Completa il programma seguente (in R), in modo che si comporti nel modo esemplificato a destra, scegliendo la condizione da inserire in "..." tra quelle elencate a sinistra.		0    e` un numero naturale 3    e` un numero naturale -1   non e` un numero naturale 4.5  non e` un numero naturale
(scan(file="",n=1) attende che l'utente batta un input, paste(fr,b,sep="") stampa fr e b senza niente in mezzo)

a <- "non "; b <- "e` un numero naturale" x<- scan(file="",n=1); fr<- ""; if(x<0 | floor(x)!=x) fr<- a; paste(fr,b,sep="")

( "calcolatore 2" e "operatori logici" neGli Oggetti Matematici)