Plot[{x^2+y^2 == 4,x == y,x==0},{x,0,4}]