Pascal - Konsolowe

Trójkąt z gwiazdek

Trójkąt z gwiazdek
Pascal - Konsolowe

Program: rysujący trójkąt z gwiazdek.

Użytkownik podaje z ilu gwiazdek chce wykonać grafikę – gdzie gwiazdka oznacza rząd.

Kompilator: Turbo Pascal

Galeria:

Program w akcji.

Kod programu:

program gwiazdki;
uses crt;
var i,j,n:integer;
begin
     clrscr;
     textcolor(14);
     write('Od ilu gwiazdek zaczac?     ');
     readln(n);
     for i:=1 to n do
     begin
          for j:=1 to n+1-i do
          write(' * ');
          writeln;
     end;
     readkey;
end.