"Se prendo un certo numero, somma ad esso 4 e poi divido il risultato per 3, alla fine ottengo 8. Qual era quel numero?" È un indovinello che puņ essere schematizzato come nella figura a destra. Prova a rispondere usando la figura.

Quanto deve mettere al posto di "..."?   Qualcosa che diviso per 3 faccia 8. Basta che prenda 8·3, cioè 24. Posso a questo punto trovare quanto fa "?".  È il numero a cui aggiungendo 4 ottengo 24. Ovviamente è 20.

Come l'insegnante puņ fare diagrammi di questo tipo con dei semplici script o con R (vedi):

source("http://macosa.dima.unige.it/r.R")
BF=6; HF=3.5          # posso cambiare quando voglio le dimensioni
boxW(-70,70, -70,70)  # questa č una scala comoda per gran parte dei diagrammi
BOX()                 # Uso BOX() per cedere la griglia; poi ripeto tutto senza BOX()
arrow(-30,60, -10,60, "black")
arrow(10,60, 30,60, "black")
x=c(-50,-30,-30,-50); y=c(70,70,50,50); polyC(x,y,"yellow")
x=c(50,30,30,50); y=c(70,70,50,50); polyC(x,y,"yellow")
x=c(-10,10,10,-10); y=c(70,70,50,50); polyC(x,y,"yellow")
t=c(0,60); ptext(t,"...")
t=c(-40,60); ptext(t,"?")
t=c(40,60); ptext(t,"8")
t=c(-20,55); ptext(t,"+4")
t=c(20,55); ptext(t,"/3")
#
# ridimensiono la finestra, poi rifaccio senza BOX (se non l'ho gia' fatto):
CLEAN(-100,100, -100,100)                                  # cancello tutto
arrow(-30,60, -10,60, "black")
arrow(10,60, 30,60, "black")
x=c(-50,-30,-30,-50); y=c(70,70,50,50); polyC(x,y,"yellow")
x=c(50,30,30,50); y=c(70,70,50,50); polyC(x,y,"yellow")
x=c(-10,10,10,-10); y=c(70,70,50,50); polyC(x,y,"yellow")
t=c(0,60); ptext(t,"...")
t=c(-40,60); ptext(t,"?")
t=c(40,60); ptext(t,"8")
t=c(-20,55); ptext(t,"+4")
t=c(20,55); ptext(t,"/3")