Newbie ASK tentang AlPro Pascal
Selasa, 17 Januari 2012 by ewepaksa
top custom html 1 Quote: Selamat malam nih sebelumnya maternity Programmer Handal.. Ane si newbie mau nnya nih.. Ane kan dikasih soal sama temen ane.. Lok cardinal bisa ngerjain,, cardinal dibandarin ;) Gini nih soalnya,, Buat information pascal yg dimana outputnya meminta memasukkan accumulation yg banyaknya sesuai yg kita mau.. Tapi diakhirnya ada tambahan untuk mencari accumulation yg kita isi tadi.. Ane cuma bisa ampe yg pertama itu yg production mengisi accumulation sesuai yg kita mau,, nah yg trakhir buntu.. Maklum newbie maternity sesepuh :) Mohon bantuannya ye.. Ini playscript ane.. Quote: program Recordn; Uses CRT; Type biodata = Record nama : String[25]; NIM : String[10]; Umur : integer; End; Var accumulation : array[1..10] of biodata; n,i : integer; begin clrscr; write(' Masukkan Banyak accumulation : '); readln(n); clrscr; for i:=1 to n do begin writeln(' Masukkan Data ke ',i); with data[i] do begin Write(' Masukkan Nama Anda : '); readln(nama); Write(' Masukkan NIM Anda : '); readln(NIM); Write(' Masukkan Umur Anda : '); readln(umur); clrscr; end; end; clrscr; for i:=1 to n do begin Writeln(' Data ke ',i); with data[i] do begin Writeln(' Nama Anda : ',nama); Writeln(' NIM Anda : ',NIM); Writeln(' Umur Anda : ',umur); end; writeln; end; Readln; End. bottom custom html 1
Yahoo
Yahoo
Posting Komentar