关于Pascal语言的习题

任意三个数，求其中最大的数。

function max(a,b,c:double):double;

begin

if a>b then

if a>c then

max:=a

else

max:=c

else

if b>c then

max:=b

else

max:=c;

end;

大致就是这样了，可能语法有毛病自己改一下吧

• ·中秋节应该送什么给女朋友
• ·【急！】有哪些微笑面对生活古人的的例子
• ·我妈时常头晕，四肢无力，不想睁眼，心跳时弱时快
• ·那能听到《给我一双翅膀》
• ·KOF拳皇系列游戏出过动画片么
• ·网页自动弹出超级兔子管不了.怎么办?
• ·升学迁移户口可不可以不迁移户口啊?如果可以对自
• ·我的视力下降了!怎么办?!
• ·斗鱼I的故事有谁知道？其中情节是小燕子被怎么了
• ·FANCL的防晒霜好还是理肤泉的好？