set serveroutput on ;
DECLARE
        TYPE tabel IS TABLE OF varchar2(10) INDEX BY BINARY_INTEGER;
        Data tabel;
        vNoUrut number:=93;
BEGIN 
        FOR vNoUrut IN 93..103
        LOOP
                Data(vNoUrut):=to_char(vNoUrut);
                nilai1 int(5);
nilai2 int(5);
nilaih int(5);
nilaiAVG int(5);


BEGIN
nilai1:= '&input1';
nilai2:= '&input2';
nilaih:= '&input3';
nilaiAVG := (nilai1+nilai2+nilaih)/3;
if nilaiAVG>=90 THEN
        dbms_output.put_line(Data(vNoUrut));
        END LOOP;
put_line('Nilai akhir: '||nilaiAVG||' index: A');

elsif (nilaiAVG between 80 and 89) THEN 
        dbms_output.put_line('Nilai akhir: '||nilaiAVG||' index: B');

elsif (nilaiAVG between 70 and 79) THEN 
        dbms_output.put_line('Nilai akhir: '||nilaiAVG||' index: C');

elsif (nilaiAVG between 60 and 69) THEN 
        dbms_output.put_line('Nilai akhir: '||nilaiAVG||' index: D');
        
        END;
        End if;
END;

        ======
create table siswa( 
        nim varchar2(10),
        nama varchar2(10),
        jurusan varchar2(10));
        
        insert all 
        into siswa values('002','saitama','D3 Tinju')
        into siswa values('009','tyson','D3 Tinju')
        into siswa values('099','goku','D3 Tinju')
        select 1 from dual;

DECLARE
nim1 varchar2(10);
nama2 varchar2(10);
jurusan3 varchar2(10);
cari varchar2(10);

BEGIN        
cari:='&input';
select nim,nama,jurusan into nim1,nama2,jurusan3 FROM siswa where nim=cari;
        dbms_output.put_line('NIM: '||nim1);
        dbms_output.put_line('NAMA: '||nama2);
        dbms_output.put_line('JURUSAN: '||jurusan3);

        
END;
/