2016 ~ Ilmu PILKOM

Thursday, December 22, 2016

Portal Unlam - Cara Memprint Kartu Ujian Mahasiswa Universitas Lambung Mangkurat (Unlam)

1. Buka terlebih dahulu halaman Portal Unlam https://portal.unlam.ac.id/mahasiswa

2. Isi NIM dan Password anda, klik Login.

3. Akan muncul tampilan sebagai berikut, jika biodata anda belum lengkap! isi terlebih dahulu biodata anda dan klik menu simpan.

4. Isi kuisioner sebelum anda memprint kartu ujian, karena kartu ujian tidak akan muncul apabila kuisoner belum terisi.

5. Pada kuisoner terdapat 2 kuisioner yaitu Evaluasi Dosen dan Kuisioner Pelayanan. Isilah 2 kuisioner tersebut.

6. Jika anda memilih Evaluasi Dosen maka akan muncul tampilan sebagai berikut. Isi kuisioner dengan menekan menu Isi Kuisioner

7. Maka akan muncul tampilan sebagai berikut. Isilah Bintang - Bintang Penilaian, jika Bintang 5 : Sangat Baik; Bintang 4 : Baik; Bintang 3 : Cukup; Bintang 2 : Kurang; Bintang 1 : Sangat Kurang. Semakin banyak bintang maka semakin sesuai pernyataan yang ada.

Kritik dan saran wajib diisi, jika tidak ada kritik maupun saran ketik "-".

Jika penilaian selesai maka pilih menu Simpan

8. Isilah kuisioner Evaluasi Dosen sampai seluruh mata kuliah telah diisi

9. Isilah Evaluasi Pelayanan sampai muncul tampilan sebagai berikut.

10. Kemudian pilih menu Kartu Ujian

11. Akan muncul tampilan sebagai berikut. Kartu Ujian anda sudah bisa dibuka setelah semua kuisioner sudah diisi.

12. Klik Cetak pada pojok atas kanan.

13. Akan muncul tampilan sebagai berikut.

14. Tekan Ctrl+P pada keyboard anda

15. Pilih menu ubah jika anda ingin menyimpan kartu ujian dalam format PDF atau memprint kartu ujian.

16. Pilih nama driver Printer anda jika ingin langsung memprint, dan pilih Simpan Sebagai PDF untuk menyimpan file tersebut kedalam format PDF

17. Setelah sesuai dengan keinginan anda maka pilih Simpan.

18. Jika anda memilih Simpan Sebagai PDF. maka akan muncul tampilan sebagai berikut setelah anda menekan menu Simpan. Simpan File tersebut pada direktori yang anda inginkan.

Saran : Print lah kartu ujian anda dengan kertas yang tebal (kertas sertifikat) agar tidak cepat hancur. Minta lah tanda tangan kepada dosen setiap anda melaksanakan Final Test.

Format Surat Permohonan Izin Penelitian

By Unknown 10:14 PM No comments

Contoh Surat permohonan Izin Penelitian ke SD/SMP/SMA/SMK/Perusahaan untuk Program Studi Pendidikan Ilmu Komputer FKIP Unlam. Setelah surat dibuat dan ditandatangani oleh Ketua Program Studi. Surat diajukan ke Subbag Akademik / BAAK FKIP Unlam (Bertempat di Sakadomas).

Tunggu surat disposisi dan disetujui oleh Dekan FKIP Unlam, Datang lagi ke Subbag Akademik / BAAK FKIP Unlam 1-2 hari setelah mengajukan dan cek dikeranjang warna merah dipojok kiri. Surat siap dipakai sesuai dengan semestinya.

Contoh Surat yang telah diisi

Contoh Surat yang telah ditandatangani

Pengantar Teknologi Informasi - Program Pascal "Menghitung Huruf"

By Unknown 1:05 AM Pengantar Teknologi Informasi No comments

Nama : Mutia Yustifisiyah Rahmah Safira
NIM : A1C614208

program menghitunghuruf;
uses wincrt;
var
kata :string;
n :array['A'..'Z'] of byte;
i :byte;
begin
writeln('Mutia Yustifisiyah R. S. ');
writeln('A1C614208');
writeln('*****************************************');
writeln('selamat datang di program penghitung huruf');readln;
write('masukkan suatu kata= ');readln(kata);
for i:=1 to length(kata) do
n[upcase(kata[i])]:=n[upcase(kata[i])]+1;
for i:=1 to 26 do
if (n[upcase(chr(64+i))]<>0) then
writeln(upcase(chr(64+i)),' banyaknya huruf=',n[upcase(chr(64+i))]);
end.

Pengantar Teknologi Informasi - Program Pascal "Sewa VCD"

By Unknown 1:03 AM Pengantar Teknologi Informasi No comments

Nama : M Fajar Firdaus
NIM : A1C614204

Program Sewa_VCD;
uses wincrt;

Type
VCD = RECORD
NP, KDVCD, JNS, STATUS : String[25];
LM, JML : Byte;
TRF, DENDA, DIS, TB : Real;
end;

DATAVCD = array [1..50] of VCD;

var
DATA : DATAVCD;
I, N : INTEGER;
GT : REAL;

procedure ISI;

begin
clrscr;

write ('Masukkan Jumlah Datanya : ');readln(N);
for I:=1 to N do
with DATA[I] do

begin

writeln;
writeln('Data Ke : ',I);
write('Nama Peminjam : ');readln(NP);
write('Kode VCD [V01-V02] : ');readln(KDVCD);
write('Status Peminjam [ANGGOTA / BUKAN ] : ');readln(STATUS);
write('Lama Pinjam : ');readln(LM);
write('Jumlah VCD Yang Dipinjam : ');readln(JML);
end;
end;

procedure TAMPIL;

begin
clrscr;
writeln(' PENYEWAAN VCD FAJAR UTAMA');
writeln(' JL. PANGLIMA BATUR');
Writeln(' BANJARBARU');

writeln('----------------------------------------------------------------------------');
writeln('NO NAMA KODE JENIS TARIF STATUS LAMA JUMLAH BESAR DISKON TOTAL');
writeln(' PEMINJAM VCD VCD SEWA PEMINJAM PINJAM PINJAM DENDA BAYAR ');
writeln('----------------------------------------------------------------------------');

for I:=1 to N do
with DATA[I] do
begin

if KDVCD='V01' then
JNS:='KOMEDI'
else
if KDVCD='V02' then
JNS:='DRAMA'
else
if KDVCD='V03' then
JNS:='ACTION';

if (JNS='KOMEDI') AND (STATUS='ANGGOTA') then
TRF:=5000
else
if (JNS='DRAMA') AND (STATUS='ANGGOTA') then
TRF:=6000
else
if (JNS='ACTION') AND (STATUS='ANGGOTA') then
TRF:=7000
else
if (JNS='KOMEDI') AND (STATUS='BUKAN') then
TRF:=6000
else
if (JNS='DRAMA') AND (STATUS='BUKAN') then
TRF:=7000
else
if (JNS='ACTION') AND (STATUS='BUKAN') then
TRF:=8000;

if LM>3 then
DENDA:=0.1*(TRF*JML)
else
DENDA:=0;

if (STATUS='ANGGOTA') AND (JNS='DRAMA') then
DIS:=0.15*(TRF*JML)
else
DIS:=0;

TB:=(TRF*JML)+DENDA-DIS;

writeln(I:2,NP:8,KDVCD:6,JNS:8,TRF:6:0,STATUS:10,LM:6,JML:8,DENDA:8:0,DIS:8:0,TB:8:0);

GT:=GT+TB;
end;
writeln('------------------------------------------------------------------------------');
writeln('GRANDTOTAL : ',' ',GT:9:0);
writeln('------------------------------------------------------------------------------');
end;

begin
ISI;
TAMPIL;
readln;
end.