Free pascal中 sin(n);cos(n);tan(n);sinh(n);cosh(n);tanh(n); 怎么用函数表示(可以是程序)

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/04 01:47:21
Free pascal中 sin(n);cos(n);tan(n);sinh(n);cosh(n);tanh(n); 怎么用函数表示(可以是程序)

Free pascal中 sin(n);cos(n);tan(n);sinh(n);cosh(n);tanh(n); 怎么用函数表示(可以是程序)
Free pascal中 sin(n);cos(n);tan(n);sinh(n);cosh(n);tanh(n); 怎么用函数表示(可以是程序)

Free pascal中 sin(n);cos(n);tan(n);sinh(n);cosh(n);tanh(n); 怎么用函数表示(可以是程序)
这些已经是函数了,系统已经帮你定义好了,直接用接行了,不过需要用Math单元:
program test;
uses math;
var x:double;
begin
readln(x);
writeln(sin(x));
end.