Program KRS

Pseudocode KRS

Algoritma Kartu_Rencana_Studi

{Mengisi kartu rencana studi dengan cara memilih mata kuliah yang diinginkan dan jumlah sks yang di haruskan}

Deklarasi

nama, nim, tahun, semester,  minat, ip, matkul1, matkul2, matkul3, matkul4, matkul5, sks1, sks2, sks3, sks4, sks5 : string

Deskripsi

Begin

Write(“SISTEM INFORMASI AKADEMIK”);

Write(“PENGISIAN KARTU RENCANA STUDI”);

Writeln(“Masukan Nama Mahasiswa :”);

Read(nama);

Writeln(“Masukan NIM Mahasiswa :”);

Read(nim);

Writeln(“Masukan Tahun Akademik Mahasiswa :”);

Read(tahun);

Writeln(“Masukan Semester Mahasiswa :”);

Read(semester);

Writeln(“Masukan Peminatan Mahasiswa :”);

Read(minat);

Writeln(“Masukan IP Tahun Lalu Mahasiswa :”);

Read(ip);

Writeln(“Pilih Mata Kuliah 1 :”);

Read(matkul1);

Writeln(“Masukan Jumlah SKS Mata Kuliah 1 :”);

Read(sks1);

Writeln(“Pilih Mata Kuliah 2 :”);

Read(matkul2);

Writeln(“Masukan Jumlah SKS Mata Kuliah 1 :”);

Read(matkul2);

Writeln(“Masukan Jumlah SKS Mata Kuliah 2 :”);

Read(sks2);

Writeln(“Pilih Mata Kuliah 3 :”);

Read(matkul3);

Writeln(“Masukan Jumlah SKS Mata Kuliah 3 :”);

Read(sks3);

Writeln(“Pilih Mata Kuliah 4 :”);

Read(matkul4);

Writeln(“Masukan Jumlah SKS Mata Kuliah 4 :”);

Read(sks4);

Writeln(“Pilih Mata Kuliah 5 :”);

Read(matkul5);

Writeln(“Masukan Jumlah SKS Mata Kuliah 5:”);

Read(sks5);

Writeln(“HASIL PENGISIAN KRS MAHASISWA”);

Write(“Nama :” +nama);

Write(“NIM :” +nim);

Write(“Tahun Akademik :” +tahun);

Write(“Semester :” +semester);

Write(“Peminatan :” +minat);

Write(“IP Tahun Lalu :” +ip);

Write(“No       KMK       Mata Kuliah           Kelas        SMT           Status         SKS  ”);

Write(“1          TKI201      ”+matkul1+“          B               2                 B             ”+sks1);

Write(“2          TKI202      ”+matkul2+“          B                2               B             ”+sks2);

Write(“3          TKI203      ”+matkul3+“          B                2               B             ”+sks3);

Write(“4          TKI204      ”+matkul4+”          B                2               B             ”+sks4);

Write(“5          TKI205      ”+matkul5+“          B                 2               B             ”+sks5);

Write(“Jumlah SKS seluruhnya : 11 sks”);

Writeln(“SEMOGA TIDAK ADA YANG MENGULANG !!”);

end

FLOWCHART KRS