Ask Question

Name:
Title:
Your Question:

Answer Question

Name:
Your Answer:
User Submitted Source Code!


Description:
  a
Language: PASCAL
Code:
program Heprogram fordalamfor2;
var
 baris, kolom, batas : integer;
begin
     write('masukan batas: ');readln(batas);
     for baris := 1 to batas do
         begin
              for kolom := 1 to baris do
                  write (baris : 2);
                  writeln;
              end;
     readln;
end.
Comments: