DECLARE
    startSeq INTEGER;
    endSeq INTEGER;
BEGIN
    SELECT MAX(id_ocena) + 1 INTO startSeq FROM ocena;
    endSeq := startSeq + 1000;
--  execute immediate 'create sequence zad6_3seq start with ' || startSeq || ' increment by 1 maxvalue ' || endSeq;
    EXECUTE IMMEDIATE 'create sequence zad6_3seq start with :start_ increment by 1 maxvalue :end_' using IN startSeq, endSeq;
END;