lab reg pert 3 adobe dreamweaver

menu :-nl,
write('==========menu========='),nl,
write('1.biodata          '),nl,
write('2.volume bola      '),nl,
write('3.nilai dan grade  '),nl,
write('4.exit             '),nl,
write('yuk dipilih (1..4):'),read(Pil),nl,
(
Pil=1,nl,nl,
write('=============biodata============='),nl,
write('...inpur "Alfanumerik"dan"spasi"?'),nl,
write('sertakan tanda kutip satu berjumlah 2 buah diantara input...'),nl,nl,
write('masukan nama anda              :'),read(A),nl,
write('masukan tempat/tanggal lahir   :'),read(B),nl,
write('masukan NPM                    :'),read(C),nl,
write('masukan kelas                  :'),read(D),nl,
write('================output=========='),nl,
write('nama                  :'),write(A),nl,
write('tempat tanggal lahir  :'),write(B),nl,
write('NPM                   :'),write(C),nl,
write('kelas                 :'),write(D),nl,
menu;




Pil=2,nl,nl,
write('============volume bola==============='),nl,
write('masukan jari jari:'),read(JARI),nl,
VOLUME is (4*3.14*JARI*JARI*JARI)/3,
write('volume bola:'),write(VOLUME),nl,
menu;

Pil=3->nl,
write('=============nilai dan grade==========='),nl,
write('masukan nilai UTS :'),read(UTS),
write('masukan nilai UAS :'),read(UAS),nl,
NIL is (UTS+UAS)/2,
write('nilai anda adalah :'),write(NIL),nl,
(
NIL>=90 -> write('Grade anda A  '),nl;
NIL>=70 -> write('Grade anda B  '),nl;
NIL>=60 -> write('Grade anda C  '),nl;
NIL>=30 -> write('Grade anda D  '),nl;
write('Grade anda E')
 ),nl,
menu;

Pil=4,nl,
write('Terimakasih atas kunjungannya:')).