SBD_LO9

-- ZAD 1
DECLARE
  v_text VARCHAR(20) := 'Witaj, świecie!' ;
  v_liczba NUMBER(9,3) := 1000.456;

  BEGIN
    DBMS_OUTPUT.PUT_LINE(v_text);
    DBMS_OUTPUT.PUT_LINE(v_liczba);
  END;
/

-- ZAD 2
DECLARE
  v_text VARCHAR(60) := 'Witaj, świecie!' ;
  v_liczba NUMBER(38,3) := 1000.456;

  BEGIN
    v_text := v_text || ' Witaj, nowy dniu!';
    v_liczba := v_liczba + POWER(10, 15);
    DBMS_OUTPUT.PUT_LINE(v_text);
    DBMS_OUTPUT.PUT_LINE(v_liczba);
  END;
/

-- ZAD 3
DECLARE
  v_liczba1 NUMBER(10, 7) := &liczba1;
  v_liczba2 NUMBER(10, 7) := &liczba2;
  v_wynik NUMBER(12, 7);

  BEGIN
    v_wynik := v_liczba1 + v_liczba2;

    DBMS_OUTPUT.PUT_LINE(v_wynik);
  END;
/

-- ZAD 4
DECLARE
  PI NUMBER(4, 2) := 3.14;
  v_promien NUMBER(6, 2) := &promien;
  v_obwod NUMBER(12, 2);
  v_pole NUMBER(12, 2);
  BEGIN
    v_obwod := 2 * PI * v_promien;
    v_pole := PI * POWER(v_promien, 2);

    DBMS_OUTPUT.PUT_LINE(v_obwod);
    DBMS_OUTPUT.PUT_LINE(v_pole);
  END;
/

-- ZAD 5
DECLARE
  v_nazwisko VARCHAR(10);
  v_etat VARCHAR(10);

  BEGIN
   SELECT NAZWISKO INTO v_nazwisko FROM PRACOWNICY WHERE PLACA_POD = (SELECT MAX(PLACA_POD) FROM PRACOWNICY);
   SELECT ETAT INTO v_etat FROM PRACOWNICY WHERE PLACA_POD = (SELECT MAX(PLACA_POD) FROM PRACOWNICY);

   DBMS_OUTPUT.PUT_LINE(v_nazwisko);
   DBMS_OUTPUT.PUT_LINE(v_etat);
  END;
/

-- ZAD 6
DECLARE
  TYPE TPracownik IS RECORD (
    nazwisko VARCHAR(10),
    etat VARCHAR(10)
  );

  v_pracownik TPracownik;

  BEGIN
    SELECT NAZWISKO, ETAT INTO v_pracownik FROM PRACOWNICY WHERE PLACA_POD = (SELECT MAX(PLACA_POD) FROM PRACOWNICY);
    DBMS_OUTPUT.PUT_LINE(v_pracownik.nazwisko);
    DBMS_OUTPUT.PUT_LINE(v_pracownik.etat);
  END;
/

-- ZAD 7
DECLARE
  SUBTYPE PIENIADZE IS NUMBER(10, 1);

  v_pieniadze PIENIADZE;
  BEGIN
    SELECT PLACA_POD INTO v_pieniadze FROM PRACOWNICY WHERE NAZWISKO = 'SLOWINSKI';

    v_pieniadze := v_pieniadze * 12;

    DBMS_OUTPUT.PUT_LINE(v_pieniadze);
  END;
/

-- ZAD 8
DECLARE
  v_decyzja NUMBER(1,0) := &decyzja;
  v_data VARCHAR(12);
  v_godzina VARCHAR(92);

  BEGIN
    IF  v_decyzja = 0 THEN
      SELECT TO_CHAR(SYSDATE, 'DD-MM-YY') INTO v_data FROM DUAL;
      DBMS_OUTPUT.PUT_LINE(v_data);
    ELSE
      SELECT TO_CHAR( (HOUR FROM CURRENT_TIMESTAMP) || ':' || (MINUTE FROM CURRENT_TIMESTAMP) || ':' || (SECOND FROM CURRENT_TIMESTAMP)) INTO v_godzina FROM DUAL;
      DBMS_OUTPUT.PUT_LINE(v_godzina);
    END IF;
  END;
/