Program bonus;
Uses wincrt ;
Var
Pembelian : longint ;
Begin
Read (pembelian) ;
If pembelian <=1000000 then
Writeln (‘diskon 0,1*pembelian’)
Else
If pembelian >=500000 then
Writeln (‘diskon 0,05*pembelian’)
Else
If pembelian >=100000 then
Writeln (‘mendapatkan 1 jam tangan’)
Else
If pembelian <50000 then
Writeln (‘anda belum beruntung’);
End.
Algoritma
- Deklarasikan variable yang dibutuhkan (misal total)
- Masukkan input yang diminta (input dilihat dari variable yang ditentukan
- Jika pembelian <=1000000,diskon 0,05*pembelian
- Jika pembelian >=500000,diskon 0,05*pembelian
- Jika pembelian >=100000,mendapatkan 1 jam tangan
- Jika pembelian <50000,anda belum beruntung
- Output diambil dari kondisi pada urutan ke 3, 4, 5, 6
flowchart-nya
ConversionConversion EmoticonEmoticon