求助Mathematica 9画图问题

用Wolfram Mathematica 9作如下计算并画图，得不到结果，求助Mathematica大神应如何修改。
其中a取值范围为0——1，b是a的函数，i是b的函数，pib是b和i的函数

b=1-a^5;

i=1-2.72^b -log[b/0.05];

pib=((1-0.05)*20-12)*0.5*b*10*500*i-10*0.5*12-10*5*100;

t1=Plot[ {b,i,pib},{a,0,1}]

已经得到解答，将log 大写为Log即可

编程即枯燥又有意思

将log 大写为Log即可