ONLINE COMPILERS
LIBRARY
MANUAL PAGES & DOCS
CONTACT
Latest Users' Questions
User Submitted Question!
Name: C_R
Title:
Function
Question:
Title:
Function
Question:
Please explain how this programme works.
program Addnum(input,output);
var
a:integer;
function Add(j:integer):integer;
var
T,i:integer;
begin
T:=0;
for i:=j downto 1 do
T:=T i;
Add:=T;
end;
begin
a:=5;
writeln(Add(a));
end.
program Addnum(input,output);
var
a:integer;
function Add(j:integer):integer;
var
T,i:integer;
begin
T:=0;
for i:=j downto 1 do
T:=T i;
Add:=T;
end;
begin
a:=5;
writeln(Add(a));
end.
Answers: