实时考试，来拯救下我的同学吧。。

都是些简单题。。本人也只学了C。。不能准确的答题   不会发图片 手敲题目 帮帮忙把、、实时更新、、
u:=-1;z:=-5 f:=6;
y:=(u+z>1)AND(z-f<-2)AND(f-u<4)OR NOT(u+f>0)OR(z-f>2);
if y then writeln('10')else writeln ('20');
求Y的输出var 
 x,y;real;
 const r=-1.45e-01;
       t=4.57e+02;
       p=-20.356;
begin
 Label1.Capton:='x=';
x:=t+p;
y:=x-r;
Label1.Capton:=Label1.Capton+format('y=%7.2f',[y]);
end;
求Y