Answer Posted / sevak.yatrik777

with Ada.Integer_Text_Io; use Ada.Integer_Text_Io;
with Ada.Text_Io; use Ada.Text_Io;

procedure Pascals_Triangle is
type Row is array(Positive range <>) of Integer;
type Row_Access is access Row;
type Triangle is array(Positive range <>) of Row_Access;
function General_Triangle(Depth : Positive) return
Triangle is
Result : Triangle(1..Depth);
begin
for I in Result'range loop
Result(I) := new Row(1..I);
for J in 1..I loop
if J = Result(I)'First or else J =
Result(I)'Last then
Result(I)(J) := 1;
else
Result(I)(J) := Result(I - 1)(J - 1) +
Result(I - 1)(J);
end if;
end loop;
end loop;
return Result;
end General_Triangle;
procedure Print(Item : Triangle) is
begin
for I in Item'range loop
for J in 1..I loop
Put(Item => Item(I)(J), Width => 3);
end loop;
New_Line;
end loop;
end Print;
begin
Print(General_Triangle(7));
end Pascals_Triangle;

What is the purpose of ftell?

601

---

If you know then define #pragma?

677

---

Who invented bcpl language?

706

---

which of the following statement is wrong a) mes=123.56; b) con='T'*'A'; c) this='T'*20; d) 3+a=b;

2410

---

What is difference between class and structure?

571

---

---

Can one function call another?

629

---

How can you avoid including a header more than once?

567

---

In the DOS enveronment, normal RAM that resides beyond the 1mb mark. a) expanded memory b) swapped memory c) Extended memory d) none

721

---

Is c procedural or functional?

589

---

Explain what are its uses in c programming?

598

---

What does the function toupper() do?

658

---

Differentiate between full, complete & perfect binary trees.

674

---

How will you write a code for accessing the length of an array without assigning it to another variable?

617

---

What does it mean when a pointer is used in an if statement?

603

---

can any one tel me wt is the question pattern for NIC exam

1559

---