SET ServerOutput ON
ACCEPT liczba PROMPT 'podaj liczbe: '
DECLARE
  inna NUMBER(5) := &liczba;
BEGIN
  inna := inna+1;
  DBMS_OUTPUT.Put_Line('oto inna liczba: '||inna);
END;
/
