uses crt; var x,y,hasil:real; jawab:char; begin write ('masukan angka ke-1:');readln (x); write ('pilih operator: (+)/(-)/(*)/(/)');readln (jawab); write ('masukan angka ke-2:');readln (y); if ( jawab= '+') then begin hasil:= x+y end; if ( jawab = '-') then begin hasil:= x-y end; if ( jawab = '*') then begin hasil:= x*y end; if (jawab='/') then begin hasil:= x/y end; write ('hasilnya: ',(hasil):5:2); end.
Jumat, 11 Oktober 2013
Rumus kalkulator sederhana
Kamis, 10 Oktober 2013
RUMUS PADA PASCAL
1. Isi Bola
Uses crt;
Var r,ib : real;
Begin
Clrscr;
Textattr:=white;
Writeln(‘ Menghitung isi bola’);
Write (‘ r:=’); readln (r);
Ib:= ¾*3.14*r*r;
Writeln (‘ ib= ‘, ib :4:2);
Readln;
End.
1. Menghitung Luas lingkaran
Uses crt;
Var luasl,r : real;
Begin
Textattr:=yellow;
Writeln(‘Menghitung Luas Lingkaran’);
Write(‘ Jari-Jari =’);
Readln (r);
Luasl:=3.14*r*r;
Writeln(‘Luas Lingkaran = ’, luasl:0:2);
Readln;
End.
1. Konfersi suhu celcius à fahrenheat
Uses crt;
Var c,f : real;
Begin
Clrscr;
Textattr:=Yellow;
Writeln(‘ Konfersi suhu celcius à fahrenheat ’);
Write(‘ c=’);readln (c);
F:=9/5*c+325 ;
Writeln(‘ f=’, f :4:2);
Readln;
End.
1. Konfersi suhu celcius à kelvin
Uses crt;
Var c,k : real;
Begin
Clrscr;
Textattr:= white;
Writeln(‘ Konfersi celcius – kelvin ‘);
Write (‘c=’); readln (c);
K:= c+273.15;
Writeln(‘k=’, k:4:2);
Readln;
End.
1. Konferi suhu celcius à reamur
Uses crt;
Var c,r : real;
Begin
Clrscr;
Textattr:= yellow;
Writeln(‘ Konfersi celcius – reamur ‘);
Write (‘c=’); readln (c);
R:= 4/5*c;
Writeln(‘r=’, r:4:2);
Readln;
end.
1
Minggu, 10 Februari 2013
Syair Tiang Agama
SHALAT
TIANG AGAMA, AMAL YANG DIHITUNG PERTAMA
BILA
SHALAT SEORANG MUSLIM BAIK,
MAKA BAIK
PULA AMAL IBADAHNYA.
TETAPI
BILA SHALATNYA RUSAK,
MAKA RUSAK
PULA SELURUH AMAL IBADAHNYA.
LIMA WAKTU
ITU YANG SELALU DISERU
TANPA
BANYAK WAKTU, SEDIKIT KENAPA TIDAK MAMPU
JANGAN
HANYA MENUNTUT HAK YANG PERLU
TAPI
KEWAJIBAN SELALU BERLALU
“FARDHU
SUBUH DUA RAKAAT”
MENGIRINGI
SESAAT TIDUR NIKMAT
LAWAN
SEMUA BISIKAN SESAT
KARENA
SUBUH ALLAH MENURUNKAN RAHMAT
“FARDHU
DZUHUR EMPAT RAKAAT”
MENGIRI
SIANG WAKTU ISIRAHAT
SEMPATKANLAH
UNTUK SHALAT
KARENA
DISITU ALLAH MEMBERI SAFAAT
“FARDHU
ASHAR EMPAT RAKAT”
ANTARA
SIANG MALAM SORE YANG TERHELAT
SHALAT
PENJEGAH DARI PERBUATAN MUNGKAR
DARI ASHAR
JANJI ALLAH TIADA PERNAH INGKAR
“FARDHU
MAGHRIB TIGA RAKAAT”
SENJA
MENUTUP TERIKNYA SIANG MATAHARI
SUNGGUH
MALANG TANPA MAGHRIB UNTUK SHALAT
TIGA KALI
LALAI SAMA SAJA MENIDURI ORANG TUA SENDIRI
“FARDHU
ISYA’ EMPAT RAKAAT”
DARI SIANG
MENJADI MALAM YANG PEKAT
MEMUPUK
HAJJAT DALAM SHALAT ISYA’
SESENGGUHNYA
MALAM WAKTU YANG BAIK UNTUK BERDOA
SHALAT
FARDHU WAJIB UNTUK DIIKAT
SHALAT
SUNNAT MAKRUH UNTUK DIINGAT
KARENA
SHALAT SUNNAT PENYEMPURNA FARDHU SHALAT
MAKA
LAKSANAKANLAH APA BILA INGIN SELAMAT
Dampak Handphone Di kehidupan Sehari-hari
Kepada
yang terhormat Bapa Kepala Sekolah , kepada yang terhormat ibu guru dan
teman-teman yang saya cintai.
Asalamualaikum
wr . wb
Marilah kita panjatkan puji syukur kehadirat Allah swt
yang telah memberikan curahan nikmat-Nya yang tiada terhingga di berikan kepada kita
sehingga kita dapat berkumpul pada kesempatan kali ini dalam keadaan sehat wal
afiat.
Sholawat serta salam semoga tercurah
limpahkan kepada Nabi Muhammad saw ,
tabi’in , dan kepada seluruh umatnya sampai akhir zaman . Amin
Pidato
saya kali ini akan menyampaikan tentang Dampak Adanya Handphone Di kehidupan
Sehari-hari.
Seperti kita ketahui adanya handphone /hp ini dapat
membuat kita menjadi terganggu terutama untuk anak sekolah , contohnya : anak
tersebut sering keasikan dengan
handphone nya masing –masing salah
satunya sms an dengan pacarnya sehingga mereka sering lupa waktu untuk
kewajiban nya belajar di setip saat , dengan hal itu handphone juga dapat menurunkan
prestasi sekolah bagi siswa.
Dengan
adanya handphone/hp ini kadang buku pelajaranpun di biarkan begitu saja. Jadi untuk orang tua
yang menghadiri acara ini supaya
mengontrol anaknya untuk belajar di setiap
hari , terutama untuk orang tua yang mempunyai anak kelas 3 yang akan menghadapi
ujian nasional diamana ujian itu akan menentukan lulus/tidaknya anak ibu/bapa
sekalian.
Demikianlah pidato singkat yang saya sampaikan semoga
biasa menjadi pelajaran bagi bapa/ibu
yang saya hormati. Saya mohon maaf apabila ada kata-kata yang kurang berkenan
di hati bapa/ibu.
Wabillahi taufiq walhidayah
Wasalamualaikum wr . wb
Karya
:: Aisyah Fitri 9B
Langganan:
Postingan (Atom)
Download Dua Garis Biru Film
DOWNLOAD DI SINI
-
Jenis-jenis kekuasaan yang berlaku dalam penyelenggaraan negara Republik Indonesia antara lain adalah kekuasaan legislatif, kekuasaan eksek...
-
Telepon Analog Analog dan digital kedua jenis teknologi, tetapi memiliki perbedaan yang berbeda. Analog didefinisikan sebagai proses men...
-
Cara mudah download vidio di youtobe facebook instagram tanpa aplikasi Klik saja link dibawah ini dan salin link vidio yang akan temen-tem...