Program z5_65;
uses crt;
var b,k,t:integer;
BEGIN
clrscr;
for b:=0 to 10 do
for k:=0 to 20 do
for t:=0 to 200 do
if (20*b+10*k+t=200) and (b+k+t=100) then
writeln('bykov ',b,' korov ',k,' telyt ',t);
readln;
END.