main( ) {
cobegin
father(); son();
daughter(); coend }
father() {
while(1)
{
P(S );
将水果放入盘中;
if (放入的是桔子)else V(Sa); } }
son( ) {
while(1)
{
P(So);
从盘中取出桔子; V(S); 吃桔子; } }
daughter( ) {
while(1) {
P(Sa);
从盘中取出苹果; V(S); 吃苹果; } }
V(So);
main( ) {
cobegin
father(); son();
daughter(); coend }
father() {
while(1)
{
P(S );
将水果放入盘中;
if (放入的是桔子)else V(Sa); } }
son( ) {
while(1)
{
P(So);
从盘中取出桔子; V(S); 吃桔子; } }
daughter( ) {
while(1) {
P(Sa);
从盘中取出苹果; V(S); 吃苹果; } }
V(So);