program z12_31;
var a:string;b:array[1..3] of string;
j,i,c,d,h,k:integer;
procedure df(var a1,a2:string);
begin
for j:=1 to length(a2) do
for i:=1 to length(a1) do if a1[j]=a2[i] then k:=k+1;
end;
begin
k:=0;
readln(a);h:=1;
for i:=1 to length(a) do
if a[i]=' '
then h:=H+1
else b[h]:=b[h]+a[i];
df(b[1],b[2]); c:=k;k:=0;
df(b[2],b[3]); d:=k;
if (d=c) and (c>0) then
writeln('sostojt iz odnogo nabora')
else writeln('net');
end.