minecraft gravel

DECLARE
 v_liczba NUMBER(6,3):=123.456;
 v_tekst VARCHAR(200):='To pierwsze zajecia z PL/SQL';
BEGIN
 DBMS_OUTPUT.PUT_LINE(v_liczba ||' '|| v_tekst);
END;

DECLARE
 v_liczbaA NUMBER(6):=:numA;
 v_liczbaB NUMBER(6):=:numB;
BEGIN
 DBMS_OUTPUT.PUT_LINE('Wynik: ' || TO_CHAR(v_liczbaA * v_liczbaA));
END;

DECLARE
 v_libA NUMBER(6):=:a;
 v_libB NUMBER(6):=:b;
 c_pi CONSTANT NUMBER(3,2):=3.14;
BEGIN
 DBMS_OUTPUT.PUT_LINE('Pole wynosi: ' || TO_CHAR(v_libA * v_libA * c_pi));
IF v_libA<v_libB
THEN
 DBMS_OUTPUT.PUT_LINE('Obwod wynosi: ' || TO_CHAR(2* v_libA * c_pi));
ELSIF v_libA>v_libB
THEN
 DBMS_OUTPUT.PUT_LINE('Obwod wynosi: ' || TO_CHAR(2 * v_libB * c_pi));
END IF;
END;

-----------------------------------------------------------------------------

DECLARE
 CURSOR cur_zespoly IS
  SELECT * FROM zesopoly;
 CURSOR cur_pracownicy(p_id_zesp NUMBER) IS
  SELECT imie, nazwisko, placa_pod
  FROM pracownicy
  WHERE id_zesp = p_id_zesp;
 CURSOR cur_pracownicy_2
  RETURN pracownicu%ROWTYPE;
BEGIN
 DBMS_OUTPUT.PUT_LINE(v_liczba ||' '|| v_tekst);
END;

DECLARE
 CURSOR cur_pracownicy IS SELECT id_prac, nazwisko FROM pracownicy;
 v_id pracownicy.id_prac%TYPE;
 v_nazwisko pracownicy.nazwisko%TYPE;
BEGIN
 OPEN cur_pracownicy;
 LOOP
  FETCH cur_pracownicy INTO v_id, v_nazwisko;
  EXIT WHEN cur_pracownicy%NOTFOUND;
  DBMS_OUTPUT.PUT_LINE(v_id ||' '|| v_nazwisko);
 END LOOP;
 CLOSE cur_pracownicy;
END;

DECLARE
 CURSOR cur_pracownicy IS SELECT * FROM pracownicy;
 v_pracownicy pracownicy%ROWTYPE;
BEGIN
 OPEN cur_pracownicy;
 LOOP
  FETCH cur_pracownicy INTO v_pracownicy;
  EXIT WHEN cur_pracownicy%NOTFOUND;
  DBMS_OUTPUT.PUT_LINE(TO_CHAR(cur_pracownicy%ROWCOUNT) || '. ' || v_pracownicy.nazwisko);
 END LOOP;
 CLOSE cur_pracownicy;
END;

--------------------------------------------------------------------------------------------------

ZAD. 1

DECLARE
 CURSOR cur_pracownicy IS SELECT nazwisko, zatrudniony FROM pracownicy;
 v_nazwisko pracownicy.nazwisko%TYPE;
 v_zatrudniony pracownicy.zatrudniony%TYPE;
BEGIN
 OPEN cur_pracownicy;
 LOOP
  FETCH cur_pracownicy INTO v_nazwisko, v_zatrudniony;
  EXIT WHEN cur_pracownicy%NOTFOUND;
  DBMS_OUTPUT.PUT_LINE('Asystent ' || v_nazwisko || ' pracuje od ' || v_zatrudniony);
 END LOOP;
 CLOSE cur_pracownicy;
END;

ZAD 2.

DECLARE
 CURSOR cur_pracownicy IS SELECT * FROM pracownicy;
 v_pracownicy pracownicy%ROWTYPE;
BEGIN
 OPEN cur_pracownicy;
 LOOP
  FETCH cur_pracownicy INTO v_pracownicy;
  EXIT WHEN cur_pracownicy%NOTFOUND;
  DBMS_OUTPUT.PUT_LINE(v_pracownicy.nazwisko);
 END LOOP;
 CLOSE cur_pracownicy;
END;