var n,i,j:integer; function flag(n:integer):boolean; var i:integer; begin flag:=true; for i:=2 to n-1 do begin if n mod i=0 then begin flag:=false;break;end; end; end; begin readln(n); for j:=4 to n do if j mod 2=0 then for i:=2 to j div 2 do begin if (flag(i)=true) and (flag(j-i)=true) then writeln(j,'=',i,'+',j-i); end; end.