program
z1221;
type TSet=
Set of 0..9;
var
n,m:longInt;
mn_n,mn_m:Tset;
Procedure
Init(x:LongInt; var mn:Tset);
begin
mn:=[];
While
x<>0 do
begin
mn:=mn+[x
mod 10];
x:=x div
10;
end;
end;
begin
writeln
('vv 1 ch');
readln(n);
Init(n,mn_n);
Writeln('vv
2 ch');
readln(m);Init(m,mn_m);
if mn_n+mn_m=[0..9]
then writeln('verno')
else
writeln('nev');
readln;end.