Выберите строки, в которых условные операторы на языке Pascal записаны без ошибок.

if x>0 then y:=sqrt(x); write (‘y=’, y) else write (‘нет ответа’);

If (x>0) and (x<=100) then y:=sqrt(x);

If 0

if x=y then z:=1; else z:=x*y;

If (x>0) or (10*x)<100 then y:= x*х*х;

if x>=10 then y:=y mod x;