matrix pascal
Iseng bermain2 dgn program matrix pascal lama…
program matriks; uses crt; var elemen : array [1..5,1..6] of byte; x,y : byte; begin clrscr; elemen [1,1] :=5; elemen [1,2] :=3; elemen [1,3] :=6; elemen [2,1] :=7; elemen [2,2] :=1; elemen [2,3] :=8; elemen [3,1] :=9; elemen [3,2] :=5; elemen [3,3] :=7; for x :=1 to 3 do; begin for y :=1 to 3 do; begin write (elemen [x,y]); end; writeln; end; end.
Advertisements
hmmm….. pertamaxxxxxxxx…. ckckck
September 28, 2010 at 2:54 pm