exp4_1.pas

来自「关于课件 好多种结构的算法 等等 大家自己看吧」· PAS 代码 · 共 13 行

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.