高考问答北京车牌螺丝安装图解:这道题怎么做？ 高手给讲一哈
来源：百度文库 编辑：高考问答 时间：2024/05/05 11:58:59
输入一个由10个整数组成的序列，其中序列中任意连续三个整数都互不相同，求该序列中所有递增或递减子序列的个数。
例如：
输入：1 10 8 5 9 3 2 6 7 4
输出：6
对应的递增或递减子序列为：
1 10
10 8 5
5 9
9 3 2
2 6 7
7 4
请用pascal做 谢谢阿
例如：
输入：1 10 8 5 9 3 2 6 7 4
输出：6
对应的递增或递减子序列为：
1 10
10 8 5
5 9
9 3 2
2 6 7
7 4
请用pascal做 谢谢阿
const
n=10;
var
i,j,k,l:integer;
ch:char;
begin
read(i);
ch:='N';
k:=0;
for l:=2 to n do
begin
read(j);
if (i>j)and(ch<>'U')
then inc(k);
if (i<j)and(ch<>'D')
then inc(k);
if i>j then ch:='U';
if i<j then ch:='D';
i:=j;
end;
writeln(k);
end.
不知
太难了，不知道
不会
有这种题吗?