Algoritma adalah kumpulan urutan perintah yang menentukan operasi-operasi tertentu yang diperlukan untuk menyelesaikan suatu masalah ataupun mengerjakan suatu tugas tertentu. Algoritma merupakan urutan langkah instruksi yang logis. Setiap langkah instruksi mengerjakan suatu tindakan aksi. Apabila suatu aksi dilaksanakan, maka operasi atau sejumlah operasi yang bersesuaian dengan aksi itu dikerjakan oleh pemroses. Bila data yang digunakan benar, maka algoritma akan selalu berhenti dengan memberikan hasil yang benar pula.
Pembuatan algoritma harus selalu dikaitkan dengan :
a. kebenaran algoritma, yakni bila program selesai maka hasilnya juga benar
b. kompleksitas, lama dan jumlah waktu proses dan penggunaan memori.
0
komentar
Posted in
- Konversi ºC (celcius) ke ºR (reamur) – > ºR = 0.8 x ºC .
- Konversi ºC (celcius) ke ºK (kelvin) -> ºK = ºC + 273 .
- Keluar Program.
- Konversi ºC (celcius) ke ºF (fahrenheit) -> ºF = 32 + (1.8 x ºC) .
- Variabel yang di gunakan dalam program ini :
- Label yang di perlukan :
- Listing program menu dan prosesnya :
- Pertanyaan konfirmasi :
- Alur program (flowchart) :
0
komentar
Posted in
Uses crt;
Var nama:string[20];jabatan:string;
Gaji:longint;
Tunj,ppn,gajibersih:real;
Begin
Clrscr;
Write(‘Nama Karyawan : ‘); readln(nama);
Write(‘Masukkan Jabatan : ‘); readln(jabatan);
If (jabatan=’Direktur’) or (jabatan=’direktur’) then
Begin
Gaji:=3000000;
Tunj:=0.1* gaji;
End
Else If (jabatan=’Manager’) or (jabatan=’manager’) then
Begin
Gaji:=2000000;
Tunj:=0.05* gaji;
End
Else If (jabatan=’Karyawan’) or (jabatan=’karyawan’) then
Begin
Gaji:=1000000;
Tunj:=0.1* gaji;
End
Else
Begin
Gaji:=800000;
Tunj:=0.1* gaji;
End;
Writeln(‘Gaji Bersih : Rp.‘,gaji);
Writeln(‘Tunjangan Jabatan : Rp.‘,tunj:9:2);
Ppn:=0.1*gaji;
Writeln(‘PPN 10 % : Rp.‘,ppn:9:2);
Total:=(gaji+total)-ppn;
Writeln(‘Total Gaji : Rp.‘,total:9:2);
Readln;
End.
