Question

How to get the row of Pascal triangle given an integer rowIndex in Pascal

Answer 1

program PascalTriangleRow;

const
  MaxSize = 100;  { Maximum row index supported }

type
  IntArray = array[0..MaxSize] of Integer;

function GetPascalTriangleRow(rowIndex: Integer): IntArray;
var
  row: IntArray;
  i: Integer;
begin
  row[0] := 1;

  for i := 1 to rowIndex do
    row[i] := row[i - 1] * (rowIndex - i + 1) div i;

  GetPascalTriangleRow := row;
end;

var
  rowIndex, i: Integer;
  row: IntArray;
begin
  rowIndex := 4;

  row := GetPascalTriangleRow(rowIndex);

  for i := 0 to rowIndex do
    Write(row[i], ' ');
  WriteLn;
end.




(*
run:
  
1 4 6 4 1 

*)

 

70+ SQL courses for beginners and professionals