#標準得点 p.87
m1 = 60
s1 = 10
z1 = (70-m1)/s1
z1

#標準得点 p.87
m2 = 70
s2 = 15
z2 = (80-m2)/s2
z2

# z=1 以下の確率（下側確率）
p1 = pnorm(1)
p1
# z=1 以上の確率（上側確率）
p2 =1-p1
p2