Найти в массиве подряд идущие элементы, удовлетворяющие условию

@dani1ka · Регистрация: 13.10.2010

Author24 — интернет-сервис помощи студентам

Помогите пожалуйсто решить задачку, не могу сообразить

Создать 2 целочисленных массива X[1..n] и Y[1..k]. Можно ли в первом из них выбрать такие k идущих подряд элементов X[ i+1 ], X[ i+2 ], . . . ,X[ i+k ], чтобы X[ i+1 ]=Y[1],
X[ i+2 ]=Y[2], . . . ,X[ i+k ]=Y[ k ]. Написать программу, которая дает ответ 'да' и выводит начальный индекс в массиве Х (т.е. i+1) или дает ответ 'нет'.

Заранее спасибо!

@use · 23.01.2011, 08:48

вот так как-то можно..

Pascal

const
  n= 30;
  k= 2;
var
  i,j: integer;
  x: array [1..n] of integer;
  y: array [1..k] of integer;
 
begin
  Randomize;
  for i:=1 to n do x[i]:= Random(10);
  for i:=1 to k do y[i]:= Random(10);
  writeln('x:');
  for i:=1 to n do write(x[i]:3);
  writeln;
  writeln('y:');
  for i:=1 to k do write(y[i]:3);
  writeln;
  i:= -1;
  j:= 0;
  while (i+k<n) and (j<=k) do begin
    inc(i);
    j:= 0;
    repeat
      inc(j)
    until (j>k) or (x[i+j]<>y[j])
  end;
  if j>k then writeln('yes, ',i) else writeln('no');
  readln
end.

Я не понял, может ли i быть равным 0. В этом варианте я считаю, что может. Если нет - замени "i:=-1;" на "i:=0;" (строка 19).

@dani1ka 0 / 0 / 0 Регистрация: 13.10.2010 Сообщений: 12
		1
	Найти в массиве подряд идущие элементы, удовлетворяющие условию 22.01.2011, 22:10. Показов 1370. Ответов 1 Метки нет (Все метки) Помогите пожалуйсто решить задачку, не могу сообразить Создать 2 целочисленных массива X[1..n] и Y[1..k]. Можно ли в первом из них выбрать такие k идущих подряд элементов X[ i+1 ], X[ i+2 ], . . . ,X[ i+k ], чтобы X[ i+1 ]=Y[1], X[ i+2 ]=Y[2], . . . ,X[ i+k ]=Y[ k ]. Написать программу, которая дает ответ 'да' и выводит начальный индекс в массиве Х (т.е. i+1) или дает ответ 'нет'. Заранее спасибо! 0

	23.01.2011, 08:48

Найти в массиве подряд идущие элементы, удовлетворяющие условию

Решение