break a time, with break the c0de…

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

One response

  1. hmmm….. pertamaxxxxxxxx…. ckckck

    September 28, 2010 at 2:54 pm

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s