Sang Pemimpin Umat dunia? Satria Sinishan Pinandito Wahyu

Membangun Negeri

Mari bersama membangun negeri tercinta dengan penuh rasa syukur dan semangat atas apa yang akan Tuhan berikan pada saat waktu telah tiba.

Hidup Indonesia

2014

Welcome King of World?
Not be long before we are citizens of Indonesia will experience significant events throughout life. Where miracles are awaited imminent that would scandalize the whole world. A moment that comes with making a country rich in culture into the country all over the world dream. the new leader of the conqueror the world will appear in this ravaged country. The government has messed up so people miserable, and there he would appear alone figure we'll wait. let's say welcome to the new country atlantis.

Indonesia independent living!!!!!

Wouw, Dollar akan naik

Harga nilai tukar Dollar terhadap Rupiah masih terus menguat. Nilai tukar rupiah terhadap dollar terpantau berada di kisaran Rp11.260 per US Dollar. Akibat dari semakin kuatnya dollar, semua menjadi naik. Mulai dari kebutuhan pokok hingga kebutuhan tersier. Belum lagi, 2014 dollar akan semakin menguat menjadi Rp.15.000 per US Dollar. Wouw Amazing.....!
Sungguh amat tragis apa yang terjadi dengan Negeri Majapahit ini. Rakyat semakin menderita dengan tidak becusnya pemerintah menyelamatkan negara. Hal ini terbukti dari banyaknya bencana alam yang terjadi, kurang di respon oleh pemerintah. Makin maraknya Korupsi, Keadilan seakan hangus.
Beginikah nasib bangsa kedepan yang akan menjadi Negara Mercusuar dunia, Panutan dunia, Super Power dunia, apa kata negeri tetangga bila kondisi buruk yang terjadi di Indonesia ini.
Untuk itulah kita sebagai Mahasiswa, Generasi bangsa yang akan menjadi wakil di pemerintahan, sudah selayaknya menyerukan Gerakan Perubahan anti Pemerintah. Butuh seorang calon pemimpin bangsa yang Jujur dan Amanah sehingga terwujudlah cita-cita terdahulu.



Nb : Artikel ini ditulis berdasar realita yang akan terjadi

Penunjang Kuliah UTM

a.       Adanya komandan tingkat (komting) per-kelas, yang bertugas mengakomodasi perkuliahan agar berjalan lancar. Antara lain : membuat milist.

b.      Setiap mahasiswa membuat email baru dengan Nama&NRP. Misal : Artika1301@yahoo.com.

c.       Setiap kelas memiliki mailing list (milist).

d.      Setiap mahasiswa harus update informasi melalui web kampus, web jurusan dan web perkuliahan dosen.

e.      Setiap mahasiswa harus memiliki kalender akademik.

f.        Setiap mahasiswa harus memiliki Buku Panduan Akademik 2013-1014.

g.       Setiap mahasiswa sebaiknya memiliki nomer hp dan email dosen wali dan dosen pengampu mata kuliahnya. Silahkan menggunakan kalimat yang sopan dan memberikan identitas jelas, ketika berkomunikasi dengan dosen.

Misal SMS : Assalamualaikum. Mohon informasi bu, apakah perkuliahan PTI kelas 1A dilaksanakan di ruang C301? Terima kasih. #Artika 13-01#

h.      Setiap mahasiswa sebaiknya memiliki rencana perkuliahan selama 4 tahun (8 semester) dan jadwal perkuliahan pribadi.

i.         Setiap mahasiswa sebaiknya memiliki peralatan utama kuliah di Informatika, antara lain: laptop, flashdisk dan mobile modem. Pastikan setiap perangkat memiliki identitas kepemilikan yang jelas beserta nomer kontak.

j.        Silahkan bergabung ke facebookgrup : Digital Multimedia Research Group (DMRG)

DMRG adalah grup tertutup riset bidang multimedia. Berisi informasi pelatihan, lomba dan topik riset bidang minat multimedia Universitas Trunojoyo. Bila ingin bergabung, pastikan id facebook Anda menunjukkan Anda adalah mahasiswa universitas Trunojoyo.

Program Kasir

Program Kasir;
uses wincrt;
var nama_barang : array[1..20] of string;
harga : array[1..20] of real;
banyak : array[1..20] of byte;
kata,grs :string;
x,y,i,j :byte;
Jum_Harga,Total_Harga,disc,Total_Bayar,uang :real;
begin
clrscr;
grs:='===============================================================';
kata:='Program Kasir';
x:=round((78-length(kata))/2);
gotoxy(x,2);writeln(kata);
x:=round((78-length(grs))/2);
gotoxy(x,3);write(grs);
{-----------------------------}
gotoxy(x,4);write('Data Belanja');
gotoxy(x,5);write(grs);
gotoxy(x,6);writeln('| No | Nama Barang | Harga Satuan |
Banyak | Jumlah Harga |');
gotoxy(x,7);write(grs);
{--------------------------------------------------------------------}
i:=0;
Total_Harga:=0;
repeat
i:=i+1;
gotoxy(x,7+i);write('| ',i);
gotoxy(x+5,7+i);write('|');
gotoxy(x+7,7+i);readln(Nama_barang[i]);
if Nama_Barang[i] <>'' then begin
gotoxy(x+25,7+i);write('|');
gotoxy(x+28,7+i);readln(Harga[i]);
gotoxy(x+28,7+i);writeln(Harga[i]:10:2);
gotoxy(x+41,7+i);write('|');
gotoxy(x+44,7+i);readln(Banyak[i]);
gotoxy(x+50,7+i);write('|');
Jum_Harga:=Harga[i]*Banyak[i];
gotoxy(x+53,7+i);writeln(Jum_Harga:10:2);
gotoxy(x+65,7+i);writeln('|');
Total_Harga:=Total_Harga+Jum_Harga ; end;
until nama_barang[i]='';
{--------------------------------------------------------------------}
disc:=0;
if (Total_Harga > 10000) and (Total_Harga <100000) then
disc:=0.05 * Total_Harga
else
if (Total_Harga >= 100000 ) then
disc:=0.1 *Total_Harga;
{--------------------------------------------------------------------}
kata:='Faktur Penjualan';
y:=round((78-length(kata))/2);
gotoxy(y,2);writeln(kata);
j:=i-1;
gotoxy(x,8+j);write(grs);
gotoxy(x,8+j+1);write('Total Belanja :');
gotoxy(x+53,8+j+1);write(Total_Harga:10:2);
gotoxy(x,8+j+2);write('Discount :');
gotoxy(x+53,8+j+2);write(disc:10:2);
gotoxy(x,8+j+3);write(grs);
gotoxy(x,8+j+4);write('Total Bayar setelah discount :');
Total_Bayar:=Total_Harga-disc;
gotoxy(x+53,8+j+4);write(Total_Bayar:10:2);
gotoxy(x,8+j+5);write('Uang diBayar');
gotoxy(x+53,8+j+5);readln(Uang);
gotoxy(x+53,8+j+5);writeln(Uang:10:2);
gotoxy(x,8+j+6);Write(grs);
gotoxy(x,8+j+7);write('Uang Kembali');
gotoxy(x+53,8+j+7);write(Uang-Total_Bayar:10:2);
end.