@echo off
color 10
:awal
echo Kalkulator Regha
echo ~~~~~~~~~~~~~~~~
set /P angka1= angka pertama :
set /P angka2= angka kedua :
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 hasil=%angka1%+%angka2%
echo hasil adalah %hasil%
goto :lagi
: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 hasil=%angka1%/%angka2%
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
echo hasil adalah %x%,%k1%%k2%
goto :lagi
echo
:lagi
set /p lagi= Apakah anda ingin menghitung ulang(y/n)?
cls
if /I "%Lagi%"=="y" GOTO :awal
if /I "%Lagi%"=="n" GOTO :keluar
:keluar
exit
Dibawah ini hasilnya:
Tambahan :
color 10
:awal
echo Kalkulator Regha
echo ~~~~~~~~~~~~~~~~
set /P angka1= angka pertama :
set /P angka2= angka kedua :
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 hasil=%angka1%+%angka2%
echo hasil adalah %hasil%
goto :lagi
: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 hasil=%angka1%/%angka2%
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
echo hasil adalah %x%,%k1%%k2%
goto :lagi
echo
:lagi
set /p lagi= Apakah anda ingin menghitung ulang(y/n)?
cls
if /I "%Lagi%"=="y" GOTO :awal
if /I "%Lagi%"=="n" GOTO :keluar
:keluar
exit
Dibawah ini hasilnya:
Tambahan :
Kurangan :
Perkalian :
Pembagian :
No comments:
Post a Comment