yang menjadi pertanyaan ane ... kenapa layar output tpw tidak bisa di scroll :bingungs contoh gambar :
uses crt; var i,a,b,x,y,xawal,jarak:byte; karakter:char; begin clrscr; write('Karakter ? ');readln(karakter); write('Input ? ');readln(i); write('Hasil -> '); x:=40; y:=3; xawal:=40; jarak:=2; for a:=1 to i do begin for b:=1 to a do begin gotoxy(x,y);write(karakt...
coba ganti di image1.picture jangan pake text1 tapi text7 karena mungkin di part D:\ nama filenya tidak ditemukan
setuju gan :thumbup ane juga suka belajar bahasa pemograman walaupun ngak ada hubungannya ama pekerjaan ane ...