Anonymní profil karel – Programujte.com
 x   TIP: Přetáhni ikonu na hlavní panel pro připnutí webu

Anonymní profil karel – Programujte.comAnonymní profil karel – Programujte.com

 

Příspěvky odeslané z IP adresy 90.177.64.–

karel
Delphi › pascaluv trojuhelnik
29. 5. 2012   #158543

   

Myslíte si že je správně ?? Nejsem si jistej.

Díky za odpovědi.

karel
Delphi › pascaluv trojuhelnik
26. 5. 2012   #158416

Díky moc, hodně si mi pomohl.

karel
Delphi › pascaluv trojuhelnik
25. 5. 2012   #158401

Zdravim všechny.

Potřeboval bych vysvětlit pár řádek z mého programu.

Z části jsem ho vymyslel, ale pár podmínek jsem našel na netu potřeboval bych je trošičku popsat, díky.

Jedná se o program, který má vykreslit pascaluv trojuhelnik.

Zatim moje řešeni. Budu vděčnej za každý náznak nevim si rady od toho for cyklu. 

const Max = 15;
      FF  = 10;
  type troj = array [1..Max] of integer;
  var I,J : integer;
      A : troj;
      n : integer;
  begin
  repeat
   writeln('zadej rad trojuhelniku');
   readln(n);
   until (n>=1) and (n<=max);
   for I:=1 to n do begin
        A[1]:=1;
        A[I]:=1;
        for J:=I-1 downto 2 do
        A[J]:=A[j-1]+A[J];
        write('':5*(n-I));
        for J:=1 to I do
        write (A[J]:FF);
        writeln;
      end;
  readln;
  end.

 

 

Hostujeme u Českého hostingu       ISSN 1801-1586       ⇡ Nahoru Webtea.cz logo © 20032021 Programujte.com
Zasadilo a pěstuje Webtea.cz, šéfredaktor Lukáš Churý