pnorm(21,20,1, lower.tail=FALSE)
pnorm(1,lower.tail=FALSE)

pnorm(22,20,1, lower.tail=FALSE)
pnorm(2,lower.tail=FALSE)