одномерный массив

[allter]

дали несколько задач , а я в этом почти ничего не понимаю , если бы кто нить выручил ... было бы супер)

Из массива А получить массив В, в котором каждый элемент массива А повторяется К раз подряд.
------------------------------
Проверьте, имеется ли в одномерном массиве последовательность из трех двоек расположенных рядом.
------------------------------

Проверьте, образуют ли элементы одномерного массива с четными индексами убывающую последовательность.
------------------------------

Проверьте, состоит ли заданный одномерный массив только из нечетных чисел.
------------------------------
Напишите программу, которая, переставляя строки и столбцы двумерного массива целиком, помещает максимальный элемент в правый верхний угол.

[Grag]

Сообщение от allter

Проверьте, образуют ли элементы одномерного массива с четными индексами убывающую последовательность.

flag:=true;
for i:=1 to N-2 do
  if not Odd(i) then
    if A[i]>A[i+2] then
      begin
        flag:=false;
        break
      end;
if flag
  then writeln('YES!!!')
  else writeln('NO...')

[Grag]

Сообщение от allter

Проверьте, состоит ли заданный одномерный массив только из нечетных чисел.

flag:=true;
for i:=1 to N do
  if not Odd(A[i]) then
    begin
      flag:=false;
      break 
    end;
if flag
  then writeln('YES!!!')
  else writeln('NO...');

Напишите программу, которая, переставляя строки и столбцы двумерного массива целиком, помещает максимальный элемент в правый верхний угол.

Это уже неоднократно было на форуме, ищи...

[DoDge_VipeR]

В задаче про четные индексы знак > надо поменять на < вроде как

[Grag]

Да, конечно нужно на противоположный заменить...