Page 104 - Pemrograman Dasar kelas X

P. 104

100 Pemrograman Dasar SMK Kelas X Sem 2

a. Kode Program
program diskonbuah;

var… ............................................... real;
…………………………………….....: integer;
begin

write('Jumlah jeruk : ');
readln( ............ );

write('Jumlah apel : ');
readln( ............ );
……………. := ……………………….;

…………..... := ……………………….;
…………….. :=….…………………….;
if (…………….) and ( .................... ) then

……………..:= ………………….
else
………………..:= …………………;

…………………….:=………………………;
write('Total uang yang harus dibayar adalah : ', total:8:2);

readln;
end.

b. Penjelasan:
................................................................................................................................

................................................................................................................................
................................................................................................................................
................................................................................................................................

99 100 101 102 103 104 105 106 107 108 109