s=sprintf
c=cat
c("  Z | 0.0")
c(sep='   0.0',0:9)
c("
----+")
for(j in 1:70)c("-")
for(i in(0:30)/10)c(sep='',s("
%1.1f |",i),s(" %1.4f",pnorm(i,-(0:9)/100)))