设A、B两个进程共享一临界资源，问如何设置信号量并用P和V操作来实现对它的访问。

设A、B两个进程共享一临界资源，问如何设置信号量并用P和V操作来实现对它的访问。

设一互斥信号量：mutex=1代表该临界资源

求下面怎么写代码，谢谢

Var mutex: semaphore:=1;
    begin
    parbegin
        process 1: begin
            repeat
                wait(mutex);
                critical section
                signal(mutex);
                remainder section
            until false;
                    end
        process 2: begin
            repeat
                wait(mutex);
                critical section
                signal(mutex);
                remainder section
            until false;
                    end
     parend

搜一下：设A、B两个进程共享一临界资源，问如何设置信号量并用P和V操作来实现对它的访问。