var
k : integer;
function f(n : integer):integer;
begin
Inc(k);
f := 9
end;
var
i : integer;
begin
i := 0;
while i <= f(9) do
Inc(i);
WriteLn(k);
k := 0;
for i := 1 to f(9) do begin end;
WriteLn(k)
end.
dmFyCglrIDogaW50ZWdlcjsKZnVuY3Rpb24gZihuIDogaW50ZWdlcik6aW50ZWdlcjsKYmVnaW4KCUluYyhrKTsKCWYgOj0gOQplbmQ7CnZhcgoJaSA6IGludGVnZXI7CmJlZ2luCglpIDo9IDA7Cgl3aGlsZSBpIDw9IGYoOSkgZG8KCQlJbmMoaSk7CglXcml0ZUxuKGspOwoJayA6PSAwOwoJZm9yIGkgOj0gMSB0byBmKDkpIGRvIGJlZ2luIGVuZDsKCVdyaXRlTG4oaykKZW5kLg==