Teman

Home » »

Program Aritmatika Dasar Pada Batch File

@echo off
echo Nama : Kgs. A. Rahman
echo Kelas : 4 TCA
echo NIM : 0611 3070 1277
:awal
ECHO *******************************************
echo Operasi Aritmatika Dasar Pada Batch File
echo.
echo *******************************************
echo.
echo [1].Penjumlahan 
echo [2].Pengurangan
echo [3].Pembagian
echo [4].Perkalian
echo [5].Exit
echo -------------------------------------------------------------

echo -------------------------------------------------------------
echo Silahkan Masukkan Pilihan Anda
set/p "pil=Pilih: "
echo -------------------------------------------------------------
if %pil%==''goto awal
if %pil%==1 goto tambah
if %pil%==2 goto kurang
If %pil%==3 goto bagi
if %pil%==4 goto kali
If %pil%==5 exit
echo.

:tambah
echo PROGRAM PENJUMLAHAN
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
set/a b=b1+b2
echo Hasil Penjumlahannya Adalah= %b%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

:kurang
echo PROGRAM PENGURANGAN
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
set/a b=b1-b2
echo Hasil Pengurangannya Adalah= %b%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

:bagi
echo PROGRAM PEMBAGIAN
set /p a=Masukkan Bilangan Ke-1 :
set /p b=Masukkan Bilangan Ke-2 :
set /A x=a/b
set /a k1=(a-x*b)*10/b
set /a k2=((a-x*b)*10-(k1*b))*10/b
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.
echo Hasil Pembagiannya Adalah = %x%,%k1%%k2%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

:kali
echo PROGRAM PERKALIAN
set/p "b1=Masukan Bilangan Ke-1: "
set/p "b2=Masukan Bilangan Ke-2: "
set/a b=b1*b2
echo Hasil Perkaliannya Adalah= %b%
echo -------------------------------------------------------------
echo Tekan tombol apa saja untuk kembali ke menu utama ...
pause>nul
cls
goto awal

1 komentar: