Program p611;
var
num:integer;
function div11(x:integer):boolean;
var sum1, sum2,t:integer;
BEGIN
sum1:=0; sum2:=0; t:=1;
while x>0 do
begin
if t=1 then sum1:=sum1+x mod 10
else sum2:=sum2+x mod 10;
t:=-t;
x:=x div 10;
end;
div11:=(sum1-sum2) mod 11=0;
end;
BEGIN
write('vvedite chislo ');
readln(num);
if div11(num) then
writeln('delitsa')
else
writeln('ne delitsa');
END.