SET ECHO OFF
SET VERIFY OFF
SET SERVEROUTPUT ON

VARIABLE g_gaji NUMBER
ACCEPT p_gaji PROMPT 'Masukkan Gaji Tahunan : '
ACCEPT p_pajak PROMPT 'Masukkan Pajak : '

DECLARE
	v_gaji NUMBER := &p_gaji;
	v_pajak NUMBER := &p_pajak;
BEGIN
	:g_gaji := NVL(v_gaji,0)*(1-v_pajak/100);
END;
/
PRINT g_gaji