Помогите решить задачки на Паскале.

[RAVEN23]

Вычислить значение логического выражения при следующих значениях логических величин X,Y и Z: X=Ложь, Y=ложь, Z=истина:
а) X или Y и не Z,
б)Не Х и не Y
в) не(Х и Z) или Y.

[Arkuz]

Вот вам пример под задание Б. Остальное делайте по аналогии.

program Project2;
var
 x,y,z:0..1;
 xf,yf:boolean;
 begin
  xf:=false;
  yf:=false;
  writeln('NOT(X) AND NOT(Y)');
  write('Input X: ');
  readln(x);
  if (x=0) and (xf=false)then
    begin
      x:=1;
      xf:=true;
    end;
  if (x=1) and (xf=false)then
    begin
      x:=0;
      xf:=true;
    end;
  write('Input Y: ');
  readln(y);
  if (y=0) and (yf=false)then
    begin
      y:=1;
      yf:=true;
    end;
  if (y=1) and (yf=false)then
    begin
      y:=0;
      yf:=true;
    end;
  if (x=1) and (y=1) then z:=1
                     else z:=0;
  writeln('RESULT = ',z);
  readln;
end.

[Chudo4258]

program Project2;
var x,y,z,p:boolean;
begin
x:=false;
y:=false;
z:=true;
p:=x or y and not(z);
Writeln(p);
P:=not(x) or not(y);
writeln(p);
p:=not(x and z) or y;
writeln(p);
readln;
end.

[RAVEN23]

Большое спасибо