Basic Pen

/ Pen in algoritmi;
While (Pen are ceva timp liber) do
        begin
            for i=1 to 2
begin
if (Pen=chef de scris) then
Pen va scrie un post;
else
Pen va vedea un pacient;
i=i+1
end;
end.