program kalkulator;
uses crt;
var
input1, input2, tambah, kurang, kali : integer;
bagi : real;
begin
clrscr;
writeln('Program Kalkulator Sederhana');
writeln('Oleh : Faiq Hisyam Marwan');
writeln(' ');
writeln(' ');
write('Masukkan Bilangan Pertama : ');
readln(input1);
write('Masukkan Bilangan Kedua : ');
readln(input2);
writeln(' ');
writeln(' ');
tambah:=input1+input2;
writeln('Hasil Penjumlahannya Adalah : ',tambah);
kurang:=input1-input2;
writeln('Hasil Pengurangannya Adalah : ',kurang);
kali:=input1*input2;
writeln('Hasil Perkaliannya Adalah : ',kali);
bagi:=input1/input2;
writeln('Hasil Pembagiannya Adalah : 'bagi);
readln;
end.
Contact Form
contoh kalkulator sederhana menggunakan pascal
- Posted by : Faiq Hisyam Marwan
- at : Saturday, April 29, 2017
- 0 Comments
Total comment
Popular Posts
Advertisement
Advertisement
Gallery
Total Pageviews
Category List
- Accept
- cara setting ip address win 7
- definisi form
- desain
- form
- fungsi form
- hex
- hex code
- hex kode
- hexcode
- ip
- ip adress
- JPEG
- kode hex
- kode warna
- listing kode
- Logo
- Logo perusahaan WartaMuda PNG
- Logo WartaMuda PNG
- MIME
- multimedia
- os windows
- programming
- warna
- warta muda
- Warta Muda PNG
- WartaMuda
- web
- window
- window 7
- window seven
- windows
- windows 7
- windows seven
- windows7
Featured
Blog Archive
-
▼
2017
(200)
-
▼
April
(12)
- contoh kalkulator sederhana menggunakan pascal
- Contoh Program pascal ganjil
- contoh program pascal REPEAT UNTIL
- Contoh program Genap Pascal FOR DO
- Contoh Program Pascal Ganjil menggunakan FOR DO
- Konsep Proses pada Sistem Operasi
- GNU Linux
- Model Process
- Konsep Manajemen Process
- Office 2013
- Peripheral
- PHYSICAL LAYER
-
▼
April
(12)
Blog Archive
-
▼
2017
(200)
-
▼
April
(12)
- contoh kalkulator sederhana menggunakan pascal
- Contoh Program pascal ganjil
- contoh program pascal REPEAT UNTIL
- Contoh program Genap Pascal FOR DO
- Contoh Program Pascal Ganjil menggunakan FOR DO
- Konsep Proses pada Sistem Operasi
- GNU Linux
- Model Process
- Konsep Manajemen Process
- Office 2013
- Peripheral
- PHYSICAL LAYER
-
▼
April
(12)
Labels
- Accept
- cara setting ip address win 7
- definisi form
- desain
- form
- fungsi form
- hex
- hex code
- hex kode
- hexcode
- ip
- ip adress
- JPEG
- kode hex
- kode warna
- listing kode
- Logo
- Logo perusahaan WartaMuda PNG
- Logo WartaMuda PNG
- MIME
- multimedia
- os windows
- programming
- warna
- warta muda
- Warta Muda PNG
- WartaMuda
- web
- window
- window 7
- window seven
- windows
- windows 7
- windows seven
- windows7