Question

ДАЮ 26 БАЛІВ
ДОПОМОЖІТЬ, зробіть ці два завдання, так як у прикладі(тобто табличкою)

1)n:=1;
for i:=1 to 4 do
n:=n*1;


2)p:=0; a:=2;
for i:=1 to 5 do
begin
a:=3*a+1
p:=p+a;
end;​