var
    a, b, c, n, m: integer;

begin
    write('n = ');
    readln(n);
    write('m = ');
    readln(m);

    a := 0;
    b := 1;

    if n < 1 then write(a,' ');
    if n < 2 then write(b,' ');

    while b < m do begin

        c := b;
        b := a + b;
        a := c;

        if (n <= b) and (b <= m) then
            write(b, ' ');
    end;
end.