Press

No matter where you are and what you look like. Create your own style.Let it be unique for yourself and yet identifiable for others.
The creation begins deep by yourself. Be inspired in my world and give your life an extra boost. So show yourself more and just be you ♥

ASAL TANAH KEMBALI KE TANAH

by - 19:48:00


"ASAL TANAH KEMBALI KE TANAH"

Saya merindui bahasa. 'Cerpen' merupakan genre terawal yang saya ceburi sejak tahun 2003. Namun, sejak sekian lamanya. Saya telah meninggalkannya dan beralih ke genre 'Sajak'. Tambahan lagi, selama beberapa tahun ini saya banyak belajar bahasa baharu, iaitu Bahasa Peringkat Tertinggi (high-level language)..Hehe..Ini adalah bahasa yang difahami oleh Komputer.

//CONTOH HIGH-LEVEL LANGUAGE

program cel;
uses crt;
var

num1 : real;
num2 : real;
oper : char;
t : char;
total : real;

begin

clrscr;
repeat

begin

writeln('enter num');
readln(num1);
writeln('enter operator');
readln(oper);
writeln('enter num');
readln(num2);

if oper = '+' then
begin
total := num1 + num2;
end

else if oper = '-' then
begin
total := num1 - num2;
end

else if oper = '*' then
begin
total := num1 * num2;
end

else if oper = '/' then
begin
total := num1 / num2;
end;

writeln('total : ' ,total:2:2);
writeln('enter to continue or t to exit');
readln(t);
end;

until(t = 't');
end.





**Wahai diri, izinkan daku kembali ke asaku. "Dari Tanah, pulang ke Tanah"

You May Also Like

0 ulasan

Terima kasih kerana sudi bertandang ke Blog Cik Bie. Senang-senang nanti datang lagi ya? Love u'olss. Muahhx