Welcome TO My Blog... "Strucktur Data"
PEMOGRAMAN STRUKTUR DATA
PEMOGRAMAN STRUKTUR DATA
Home
Mata Kuliah
download
tugas
tutorial
laporan
MUNIR MAESTRO
STRUKTUR DATA
Sabtu, 03 Maret 2012
PROGRAM MATRIX
Tampilan Saat Dirunning
PROGRAM MATRIX;
uses
WinCrt;
var
A,B,C:ARRAY[1..10,1..10] OF INTEGER;
X,Y,KOL,BAR:INTEGER;
BEGIN
FOR X:=1 TO 5 DO
BEGIN
FOR Y:=1 TO 5 DO
BEGIN
C[X,Y]:=0;
IF X+Y=6 THEN C[X,Y]:=1;
WRITE(C[X,Y]:4);
END;
WRITELN;
END;
END.
0 komentar:
Posting Komentar
Posting Lebih Baru
Posting Lama
Beranda
Langganan:
Posting Komentar (Atom)
0 komentar:
Posting Komentar