uses crt; var x,y,hasil:real; jawab:char; begin write ('masukan angka ke-1:');readln (x); write ('pilih operator: (+)/(-)/(*)/(/)');readln (jawab); write ('masukan angka ke-2:');readln (y); if ( jawab= '+') then begin hasil:= x+y end; if ( jawab = '-') then begin hasil:= x-y end; if ( jawab = '*') then begin hasil:= x*y end; if (jawab='/') then begin hasil:= x/y end; write ('hasilnya: ',(hasil):5:2); end.
Jumat, 11 Oktober 2013
Rumus kalkulator sederhana
Langganan:
Posting Komentar (Atom)
Download Dua Garis Biru Film
DOWNLOAD DI SINI
-
Jenis-jenis kekuasaan yang berlaku dalam penyelenggaraan negara Republik Indonesia antara lain adalah kekuasaan legislatif, kekuasaan eksek...
-
Cara mudah download vidio di youtobe facebook instagram tanpa aplikasi Klik saja link dibawah ini dan salin link vidio yang akan temen-tem...
-
Telepon Analog Analog dan digital kedua jenis teknologi, tetapi memiliki perbedaan yang berbeda. Analog didefinisikan sebagai proses men...
Tidak ada komentar:
Posting Komentar