Senin, 07 Oktober 2013

Kalkulator (BATCH)

@echo off
:depan
echo Kalkulator
echo ~~~~~~~~~~~~~~~~~~~~

set /P angka1= angka pertama :
set /P angka2= angka kedua :
set "K1="
set "K2="





echo 1. tambah
echo 2. kurang
echo 3. kali
echo 4. bagi
echo 5. keluar
set "bilangan="
set /P bilangan= Pilih operasi yang diinginkan :


IF /I "%bilangan%"=="1" GOTO :tambah
IF /I "%bilangan%"=="2" GOTO :kurang
IF /I "%bilangan%"=="3" GOTO :kali
IF /I "%bilangan%"=="4" GOTO :bagi
IF /I "%bilangan%"=="5" GOTO :keluar

:tambah
set /a x=angka1+angka2
set /a k1=(x/x)
set /a k2=((angka1-x*angka2)*10-(k1*angka2))*10/angka2
if errorlevel 1 goto start
if /i %k1% lss 0 set /a k1=0-k1
if /i %k2% lss 0 set /a k2=0-k2
set /a hasil=%angka1%+%angka2%
echo hasil adalah %x%,%k1%%k2%
goto :lagi
echo.
:kurang
set /a hasil=%angka1%-%angka2%
echo hasil adalah %hasil%
goto :lagi
:kali
set /a hasil=%angka1%*%angka2%
echo hasil adalah %hasil%
goto :lagi
:bagi
set /a x=angka1/angka2
set /a k1=(angka1-x*angka2)*10/angka2
set /a k2=((angka1-x*angka2)*10-(k1*angka2))*10/angka2
if errorlevel 1 goto start
if /i %k1% lss 0 set /a k1=0-k1
if /i %k2% lss 0 set /a k2=0-k2
set /a hasil=%angka1%/%angka2%
echo hasil adalah %x%,%k1%%k2%
goto :lagi
echo.
:lagi
set /P lagi=apa ingin menghitung ulang (ya/tidak)?
cls
if /I "%lagi%"=="ya" GOTO :depan
if /I "%lagi%"=="tidak" GOTO :keluar
:keluar
exit

0 komentar:

Posting Komentar