数学算法

源代码在线查看: fpoly.txt

软件大小: 1410 K
上传用户: xhaibo
关键词: 算法
下载地址: 免注册下载 普通下载 VIP

相关代码

				Procedure FPOLY(X:real; var P:array of real; NP:integer);
				var
				    J:integer;
				begin
				    P[1]:=1;
				    For J:=2 To NP do
				      P[J]:=P[J - 1] * X;
				end;			

相关资源