Senin, 10 Desember 2012

Membuat kalkulator dengan batch file

@echo off
title Belajar Menghitung dengan file Batch
:awal
color 1b
ECHO *************************************************************
echo BELAJAR MENGHITUNG YUK!
echo.
echo *************************************************************
echo.
echo [1].Perkalian [2].Penjumlahan [3].Pembagian [4].Pengurangan
echo -------------------------------------------------------------
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
echo -------------------------------------------------------------
echo Pilih 1/2/3 atau 4
set/p "pil=Pilih: "
echo -------------------------------------------------------------
if %pil%==''goto awal
if %pil%==1 goto kali
if %pil%==2 goto tambah
If %pil%==3 goto bagi
if %pil%==4 goto kurang
echo.
:kali
set/a b=b1*b2
echo Hasil Perkaliannya Adalah = %b%
echo -------------------------------------------------------------
set lanjut=Tekan tombol apa saja untuk lanjut...
echo %lanjut%
pause>nul
cls
goto awal
:tambah
set/a b=b1+b2
echo Hasil Penjumlahannya Adalah= %b%
echo -------------------------------------------------------------
set lanjut=Tekan tombol apa saja untuk lanjut...
echo %lanjut%
pause>nul
cls
goto awal
:bagi
set/a b=b1/b2
echo Hasil Pembagiannya Adalah= %b%
echo -------------------------------------------------------------
set lanjut=Tekan tombol apa saja untuk lanjut...
echo %lanjut%
pause>nul
cls
goto awal
:kurang
set/a b=b1-b2
echo Hasil Pengurangannya Adalah= %b%
echo -------------------------------------------------------------
set lanjut=Tekan tombol apa saja untuk lanjut...
echo %lanjut%
pause>nul
cls
goto awal

Related Posts:

  • GOWES ON MONAS Read More
  • MODUL PASCALMODUL PASCAL Apa itu Turbo Pascal ?Pascal merupakan suatu bahasa komputer tingkat tinggi yang dibuat sekitar tahun1970 oleh Niklaus Wirth dan digunakan untuk pendidikan komputer. Nama Pascaldiambil dari seorang ahli matematik… Read More
  • Gowes Read More
  • 3 elemen utama komputer v\:* {behavior:url(#default#VML);} o\:* {behavior:url(#default#VML);} w\:* {behavior:url(#default#VML);} .shape {behavior:url(#default#VML);} Normal 0 false false false false EN-US X-NONE X… Read More
  • DOS Normal 0 false false false EN-US X-NONE X-NONE … Read More

0 komentar:

Posting Komentar