G-1) Iterative:
Procedure Mult(a,b:integer);
begin
answer:=0;
for i:=b downto 1 do
answer:=answer+a;
end;
Recursive:
Procedure Mult(a,b:integer);
begin
if b>=1 then a:=a + (mult(a,b-1));
end;
G-2) 21
G-3) a) i. 1
ii. 1 2 1
iii. 1 2 1 3 1 2 1
b) 15
c) (2**k) - 1
H-1) A C E D B F
H-2) B A C E D