exp4-11.pas

关于课件 好多种结构的算法 等等 大家自己看吧

program exp4_11(input,output);
var
   i:integer;
   x,y,z:real;
begin
   writeln('x':12,'exp(x)':16,'ln(x)':16);
   for i:=1 to 10 do
     begin
       x:=1.0+i/10;
       y:=exp(x);
       z:=ln(x);
       writeln(x:12,y:16,z:16);
     end
end.