Kamis, 14 November 2013

Pseudocode Program KRS



TUGAS JURNAL MODUL 1
PRAKTIKUM TEKNOLOGI INFORMATIKA


PSEUDOCODE PEMBUATAN KRS





Disusun Oleh :

1.     Dian Lestari Br P (21070113120007)
2.     Midiawati (21070113120009)
3.     Mario Exaudia Purba (21070113120029)



PROGRAM STUDI TEKNIK INDUSTRI
FAKULTAS TEKNIK UNIVERSITAS DIPONEGORO
SEMARANG
2013
Algoritma_Pembuatan_KRS
Deklarasi:  nama, nim, a, b, c, d, e, p, q, r, s, t,w, m : String

Deskripsi :
begin
writeln(“************************************”);
writeln(“----------------PENGISIAN KRS---------------“);
writeln(“************************************”);
writeln ( “masukkan nama anda!”);
read (nama);
writeln (“masukkan nim anda!”);
read (nim);
writeln (“matkul 1”);
read (a);
writeln(“jumlah SKS”);
read (p);
writeln (“matkul 2”);
read (b);
writeln ( “jumlah SKS”);
read ( q);
writeln (“matkul 3”);
read ( c);
writeln( “ jumlah SKS”);
read (r);
writeln (“matkul 4”);
read (d);
writeln (“jumlah SKS”);
read (s);
writeln (“matkul 5”);
read (e);
writeln (“jumlah SKS”);
read (t);
writeln(“masukkan beban studi maks”);
read(w);
writeln(“masukkan peminatan anda”);
read(m);
writeln(“Kartu SKS Semester 2”);
write(“Nama : “+nama);
write(“IP lalu : 0,0”);
write(“Tahun Akademik : 2013/2014”);
write(“NIM : “+nim);
writeln(“Beban studi maks : “+w+”sks”);
write(“Semester/Komulatif : gasal/2”);
write(“Peminatan : “+m);
writeln(“Ipk/Sksk : 0/sks”);
writeln (“|No| _|KMK| _|Mata kuliah| _|kelas|_ |semester|_|Status|_|Jumlah SKS|”);
writeln(“|1|”­_+a.substring(0.3).toUpperCase()+p+_”|_”+a+”_|_B_|_2_|_B_|”+p+”|”);
writeln(“|2|”­_+b.substring(0.3).toUpperCase()+q+_”|_”+b+”_|_B_|_2_|_B_|”+q+”|”);
writeln(“|3|”­_+c substring(0.3).toUpperCase()+r+_”|_”+c+”_|_B_|_2_|_B_|”+r+”|”);
writeln(“|4|”­_+d. substring(0.3).toUpperCase()+s+_”|_”+d+”_|_B_|_2_|_B_|”+s+”|”);
writeln(“|5|”­_+e. substring(0.3).toUpperCase()+p+_”|_”+e+”_|_B_|_2_|_B_|”+t+”|”);
writeln(“============================================”);
writeln(“Terimakasih telah mengisi KRS Anda”);
end

Tidak ada komentar:

Posting Komentar