program pm;
var a:integer;

function zapl_3(x:integer):boolean;
var pm:integer;
begin
	pm:=x div 3;
	while pm>=0 do begin
		if pm*3=x then begin
			zapl_3:=true;
			writeln('3 je pouzito ',pm,'krat');
			exit;
		end;
		dec(pm);
       
	end;
	zapl_3:=false;
end;
function zapl_7(x:integer):boolean;
var pm:integer;
begin
	pm:=x div 7;
	while pm>=0 do begin
		if pm*7=x then begin
			zapl_7:=true;
			writeln('7 je pouzito ',pm,'krat');
			exit;
		end;
	
		if zapl_3(x-pm*7) then begin
			zapl_7:=true;
			writeln('7 je pouzito ',pm,'krat');
			exit;
		end;
		dec(pm);
       
	end;
	zapl_7:=false;
end;
function zapl_11(x:integer):boolean;
var pm:integer;
begin
	pm:=x div 11;
	while pm>=0 do begin
		if pm*11=x then begin
			zapl_11:=true;
			writeln('11 je pouzito ',pm,'krat');
			exit;
		end;
	
		if zapl_7(x-pm*11) then begin
			zapl_11:=true;
			writeln('11 je pouzito ',pm,'krat');
			exit;
		end;
		dec(pm);
       
	end;
	zapl_11:=false;
end;

Begin
 readln(a);
 if zapl_11(a) then writeln('Da sa.')
               else writeln('Neda sa.');
end.
