pascal的函数题!!!求助!!!!!!!!!!!!!!!!!

来源:百度知道 编辑:UC知道 时间:2024/07/04 21:30:32
一个RT三角形ABC,角C=90度,角B=60度,BC=6,求斜边长?用函数做!要全的!谢谢!!!!
是TURBO PASCAL的,我说了要用函数做! - - 请你们不要自以为是的讲别人好吗? 我都说了用函数做! 用cos做啊,6/cos(60)的那种,你们自己看清楚啊

太简单了吧!
FUNCTION f:real;
BEGIN
f:=6/cos(派*60/180)
END;
在主程序调用这个函数即可。直接用顺序结构就好,干嘛用函数?自找麻烦!

begin
writeln(12);
end.

{..........}

...................................