exp4_1.pas

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

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