简单的pascal语言 能否帮我解释一下这段语言的意思啊

Var mutex,empty,full:semaphore :1,n,0;
buffer:array[0,……，n-1]of item;
in,out:integer :=0,0;
begin
parbegin
proceducer:begin
repeat
……
producer an item nextp;
……
wait(empty);
wait(mutex);
buffer(in):nextp;
in:=(in+1)mod n;
signal(mutex);
signa(full);
until false;
end
consumer:begin
repeat
wait(full);
wait(mutex);
nextc :=buffer(out);
out :=(out+1)mod n;
signal(mutex);
signal(empty);
consumer the item in nextc;
until false;
end
parend
end

mutex到底作为哪段进程的信号量 还有就是proceducer和consumer之间是怎么连接的
现在我还是初学者，还请大家不要见笑

几道pascal语言的简单题目 pascal语言的简单题目,本人菜鸟不会 pascal语言的问题~ Pascal简单的编程 pascal语言是谁编的 会PASCAL语言的来! pascal语言的错题 关于Pascal语言的习题 关于PASCAL语言的问题 pascal的一个简单题