%Octave

function hw3(ACrms_in, UdAV, UdAC)

    printf("Nilai RMS AC masukan (sumber): %3.3f \n", ACrms_in)
    printf("Nilai RMS AC keluaran half-wave: %3.3f \n", UdAC)
    printf("Nilai rata-rata DC keluaran half-wave: %3.3f \n", UdAV)


    UcRMS_acdc=sqrt((UdAV^2)+(UdAC^2));
    printf("Nilai tegangan RMS ac+dc keluaran half-wave rectifier: %3.3f \n", UcRMS_acdc)

    ratio1=UdAV/ACrms_in;
    printf("Nilai perbandingan tegangan rata-rata (dc) keluaran terhadap nilai RMS AC masukan: %3.3f \n", ratio1)

    ratio2=UcRMS_acdc/ACrms_in;
    printf("Nilai perbandingan tegangan rms ac+dc keluaran terhadap nilai RMS masukan: %3.3f \n", ratio2)

    vin_peak = UdAV*pi;
    printf("Nilai tegangan puncak (Vpeak) masukan berdasarkan tegangan rata-rata keluaran (%3.3f) : %3.3f \n", UdAV, vin_peak)

    rect_ratio = ((vin_peak/pi)^2/(0.5*vin_peak)^2)*100;
    printf("Nilai rectification ratio: %3.3f %% \n", rect_ratio)

    form_factor = (UcRMS_acdc)/(UdAV);
    printf("Nilai form factor (FF): %3.3f \n", form_factor) 

    ripple_factor1 = sqrt((form_factor^2)-1);
    printf("Nilai ripple factor (RF) cara 1: %3.3f \n", ripple_factor1) 

    ripple_factor2 = UdAC / UdAV;
    printf("Nilai ripple factor (RF) cara 2: %3.3f \n", ripple_factor2) 
endfunction

%hw2(49,21.2,26.2)
hw2(12.021,5.4113,6.555)