clc;
clear all;
close all;
n = 1 ;
x = zeros(100,1);
while n~= 0
n = input('请输入向量的长度n（0退出程序）:');
for i = 1:n
x(i) = input(['请输入向量的第' num2str(i) '分量']);
end
y = diff(x(1:n));
if all(y > 0)
c = 2;
elseif all(y >= 0)
c = 1;
elseif all(y < 0)
c = -2;
elseif all(y <= 0)
c = -1;
else
c = 0;
end
if n ~= 0
disp(x(1:n));
switch c
case 0
disp('输入的向量不具有单调性');
case 1
disp('输入的向量是单调递增的');
case 2
disp('输入的向量是严格递增的');
case -2
disp('输入的向量是递减的。');
case -1
disp('输入的向量具有严格递减性');
end
end
end