Sabtu, Juli 18, 2015

Program Pascal Menampilkan Bilangan Dengan Pola Tertentu

7/18/2015 12:27:00 PM  "sahabat informasi"  No comments

Program pascal untuk menampilkan bilangan dengan pola tertentu seperti di bawah ini:
1 2 3 4  5
5 6 7 8 
8 9 10
10 11
11

adalah:

var a,b,c,d:integer;

begin
  d:=5;
  for a:=1 to 5 do
  begin
   for b:= 1 to d do
   begin
    c:=c+1;
    write(c,' ');
   end;
   d:=d-1;
   c:=c-1;
   writeln;
  end;
  readln
end.
Jika ada yang dirasa kurang mengerti silakan ditanya... : )
Semoga membantu, terimakasih... :)

Posted in:

0 komentar:

Posting Komentar