clc;clear;
%% Requesting the first integer
num1=input('Please enter how long you would like your Fibonacci sequence to be.(Must be greater than 3): ');

 while(num1<=3)
                  num1=input('Number is not greater than 1. Please reenter the number: ');
              end

reorint = 0;                            % ‘Real-or-Integer’ flag
while reorint == 0                      % Continue looping until ‘good’ number entered

    if isreal(num1) && rem(num1,1)==0
        reorint = 1;                    % ‘Real-or-Integer’ number
    else
        num1 = input('Number is not an integer. Please reenter the number: ');
        reorint = 0;                    % ‘Complex or non-integer’ number
    end
end
fprintf(1, '\n');

%% Requesting the second integer

num2=input('Please enter to what precision you would like the PHI number to be calculated with.(Must be between 2 & 10): ');

 while(num2<2 || num2>10)
                  num2=input('Number is not between 2 & 10. Please reenter the number: ');
              end

reorint = 0;                            % ‘Real-or-Integer’ flag
while reorint == 0                      % Continue looping until ‘good’ number entered

    if isreal(num2) && rem(num2,1)==0
        reorint = 1;                    % ‘Real-or-Integer’ number
    else
        num2 = input('Number is not an integer. Please reenter the number: ');
        reorint = 0;                    % ‘Complex or non-integer’ number
    end
end
fprintf(1, '\n');

%% Creating the Fibonacci sequence

Xa = -1;
Xb = 1;
for k=1:num1
    Y=Xa+Xb;
    out(k)=Y;
    Xa=Xb;
    Xb=Y;
end

% Displaying the sequence cleanly
NumsPerRow = 30;
 N = ceil(numel(out)/NumsPerRow);
 disp('Your Fiboncacci Sequence is:');
 fprintf(1, '\n'); %adding a blank line
for n = 1:N
    startIndex = (n-1)*NumsPerRow + 1;
    stopIndex = startIndex + NumsPerRow -1;
    stopIndex = min(numel(out), stopIndex);
    L = stopIndex-startIndex+1;

    fmt = [repmat('%3d  ', 1, L-1),'%3d', '\n'];

    fprintf(fmt, out(startIndex:stopIndex));
end % Sorted Array = X
fprintf(1, '\n'); %adding a blank line

%%