Question

如何用C语言产生窄带高斯信号？求解！

Answer 1

define ATOM 0
#define LIST 1
/*ATOM=0，表示原子；LIST=1，表示子表*/
typedef enum
{
ATOM,LIST
}elemtag;
typedef struct glnode
{
elemtag tag;
union
{
atomtype atom;
struct glnode *hp;
}atom_hp;
struct glnode *tp;
}glnode,*glist;
广义表的数据结构

Answer 2

procedure TForm1.Button1Click(Sender: TObject);
var
i,j,k:integer;
a,b,c:integer;//存放最大三个值
begin
Memo1.Clear;
a:=0;
b:=0;
c:=0;
for i := 2 to 100 do
begin
k := 0;