Hi guys, so yeah, I got some IT homework AGAIN on programs and I repeatedly did trace tables and they all worked, but somehow, when I enter it in turbo pascal, after the 10th number, the digits start to get negative and after the 6th number, its not following the sequence... Anyways, the question states: Write a program to generate the first 20 terms of the following sequence: 1,3,3,9,27,243,6561.........here's the program that I did:

program sequence;
uses wincrt;
var X,Y,Result,i:integer;
Begin
X:=1;
Y:=3;
Result:=X*Y;
Writeln(X);
Writeln(Y);
For i:=1 to 18 do
Begin
Y:=X;
X:=Result;
Result:=X*Y;
Writeln(Result);
End;
End.

Sir
Please help me about MenuStrip Control used.
I create a project there one parents form and two child form
MenuStripControl-1 is on parents form (main_form)
Menu Item name a) ...

So I am having trouble knowing what to return in the bottom method any help would be appreciated .
Here are the specifications for completing the StringArray class: