Menghitung Daya Input (p1) dan Daya Input (BHP) pada Mesin Elektrik

Menghitung  Daya Input (p1) dan Daya Input (BHP) pada Mesin Elektrik

Listing  Program:

Uses CRT

Var a,b :Integer;

YN : Char;

ClrScr

Write(‘p1=v1.I1 cos θ A terbesar’’);

Readln(‘p1=v1.I1 cos θ A terbesar’’);

Pilihsn;p1

Begin

Write(‘p0=pm – (rugi besaran&geseran’);

Readln(‘p0=pm – (rugi besaran&geseran’);

Pilihsn;p0

Begin

If (a>b)then

Writeln(‘p1=v1.I1 cos θ A terbesar’);

Read;

Else

Writeln(‘p0=pm – (rugi besaran&geseran) B terbesar’);

end

 

                                                

 

Penjelasan Listing Program Daya Input pada Mesin Elektrik dengan menggunakan dua rumus Dengan dua looping peryataan

1. Start

2. Masukkan nilai p1

3. Masukkan nilai I1

4. Masukkan nilai  cos θ

5. Masukkan nilai p0

6. Masukan nilai p0? Jika ’Ya’ maka masukkan kata    

    ’p1’,jika ’Tidak’ maka akan berlanjut sampai kata ’a=abc’ .Berlanjut ketika program ya maka masukan ‘P0’,jika  ‘tidak’ maka akan berlanjut sampai kata ‘a=dc’

    dimasukkan.

7. Jumlah Daya yang di pakai ada Dua yaitu  Daya Input (p1),Daya Input (BHP)

8. Ulangi?Jika ’YA’ maka program akan memulai dari awal lagi,jika

    ’Tidak’ maka program akan berakhir.

9. End