第四题凸多边形的三角形划分（文件名：4.pas）在一个凸多边形中,通过若干条互不相交的对角线,把这个凸多边形剖分成了若干个三角形.现在的任务是根据输入的凸多边形的边数,求不同剖分

Question

第四题 凸多边形的三角形划分（文件名：4.pas）
在一个凸多边形中,通过若干条互不相交的对角线,把这个凸多边形剖分成了若干个三角形.现在的任务是根据输入的凸多边形的边数,求不同剖分的方案数Cn .比如当n=5时,有如下5种不同的方案,所以C5=5.输入文件4.in：一个正整数,表示凸多边形的边数.（n

Answer 1

program p2_2(input,output);
const max=21;
var c:array[2..max] of longint;
n,i,k:integer;
total:longint;
begin
readln(n);
c[2]:=1;
for i:=3 to n do
begin
c[i]:=0;
for k:=2 to i-1 do c[i]:=c[i]+c[k]*c[i-k+1];
end;
writeln(c[n]);
end.