Показать сообщение отдельно

  #5869  
Старый 23.03.2010, 17:20
EndLeSSDre@M
Участник форума
Регистрация: 18.07.2009
Сообщений: 278
С нами: 8850305

Репутация: 259
По умолчанию

Цитата:
сколько подряд идущих элементов образуют возр последовательность...
не совсем понял вопроса... или наибольшее число идущих подряд элементов образующих возр послед, или как??? например: 1 2 4 3 6 3 2 1
тут максимальное количество идущих подряд равно 3 но так же есть и другие возр послед в которых 2 элемента... так все таки уточни задачу

Не дождался ответа, и решил задачу так как я понял ее... в общем выдает максимально число элементов которые идут подряд с возрастанием:

PHP код:
program Project2;

{
$APPTYPE CONSOLE}

uses
  SysUtils
;

var 
a:array[1..10]of integer;
b:array[1..10]of integer;
i,j,h:integer;
begin
h
:=1;
j:=1;
randomize;
    for 
i:=1 to 10 do begin
      a
[i]:=random(10);
      
write(a[i],' ');
   
end;



   for 
i:=1 to 10 do begin
      
if a[i]> a[i+1then
         begin
         inc
(j);
         
end
      
else
      
begin
         b
[h]:=j;
         
j:=1;
         
h:=h+1;
      
end;
   
end;

h:=h+1;
b[h]:=j;
j:=b[1];

   for 
i:=2 to h do
      
begin
         
if b[i]>j then j:=b[i];
      
end;

writeln;

writeln(j);

readln;
end

Последний раз редактировалось EndLeSSDre@M; 23.03.2010 в 19:25..
 
Ответить с цитированием