PROGRAM6198.PAS

{* Одномерные массивы *}

{ Выберите программу или раздел при помощи графического манипулятора «Мышь» ! }
Case User Of
  •  'Задача 35' : Uses zadah35.pas; { Нечетные элементы целочисленного массива A размера N≤15 записать в массив B. Вывести размер массива B и его содержимое. ... }
  •  'Задача 36' : Uses zadah36.pas; { Элементы целочисленного массива A размера N≤15 кратные 3 записать в массив B. Вывести размер массива B и его содержимое. ... }
  •  'Задача 37' : Uses zadah37.pas; { Для массива A размера N наполнить массив B по правилу: элемент Bk равен сумме элементов массива A с номерами от1 до k ... }
  •  'Задача 39' : Uses zadah39.pas; { Для массива A размера N наполнить массив B по правилу: элемент Bk равен сумме элементов массива A с номерами от K до N ... }
  •  'Задача 4' : Uses zadah4.pas; { Для N>1, первого члена A разности D геометрической прогессии наполнить и вывести массив размера N, содержащий N первых членов прогрессии: A, AD, AD2, AD3 … ... }
  •  'Задача 40' : Uses zadah40.pas; { Для массива A размера N наполнить массив B по правилу: элемент Bk равен среднему арифметическому элементов массива A с номерами от K до N ... }
  •  'Задача 41' : Uses zadah41.pas; { Объединить упорядоченные по возрастанию массивы A и B размера N=5 в массив C размера N=10 с элементами, упорядоченными по возрастанию ... }
  •  'Задача 42' : Uses zadah42.pas; { Увеличить четные элементы массива A размера N на величину первого четного элемента. Если четных чисел нет оставить все без изменений. ... }
  •  'Задача 43' : Uses zadah43.pas; { Увеличить нечетные элементы массива A размера N на величину последнего нечетного элемента. Если нечетных чисел нет, то оставить все без изменений. ... }
  •  'Задача 44' : Uses zadah44.pas; { В массиве размера N поменять местами минимальный и максимальный элементы ... }
  •  'Задача 45' : Uses zadah45.pas; { В массиве размера N (N- четное) поменять местами первый элемент со вторым, третий с четвертым и т.д. ... }
  •  'Задача 46' : Uses zadah46.pas; { В массиве размера N (N- четное) поменять местами первую и вторую половину массива ... }
  •  'Задача 47' : Uses zadah47.pas; { В массиве размера N поменять порядок его элементов ... }
  •  'Задача 48' : Uses zadah48.pas; { Дан массив A размера N. Для целых чисел K и L 1≤K<L≤N переставить в обратном порядке элементы массива расположенные между AK и AL ... }
  •  'Задача 49' : Uses zadah49.pas; { Дан массив A размера N. Для целых чисел K и L 1≤K<L≤N переставить в обратном порядке элементы массива расположенные между AK и AL не включая эти элементы ... }
  •  'Задача 5' : Uses zadah5.pas; { Для N>2, наполнить и вывести массив размера N, содержащий N первых элементов последовательности чисел Фибоначчи Fk: F1=1, F2=1, Fk=Fk-2+Fk-1 , K=3, 4… ... }
  •  'Задача 50' : Uses zadah50.pas; { Дан массив A размера N. Обнулить все его локальные максимумы ... }
  •  'Задача 51' : Uses zadah51.pas; { Дан массив A размера N. Сдвинуть элементы массива вправо на одну позицию. В первый элемент записать 0. ... }
  •  'Задача 52' : Uses zadah52.pas; { Дан массив A размера N. Сдвинуть элементы массива влево на одну позицию. В последний элемент записать 0. ... }
  •  'Задача 53' : Uses zadah53.pas; { Дан массив A размера N. Сдвинуть элементы массива вправо на K позиций. В первые K элементов записать 0. ... }
  •  'Задача 54' : Uses zadah54.pas; { Дан массив A размера N. Сдвинуть циклически элементы массива вправо на одну позицию. ... }
  •  'Задача 55' : Uses zadah55.pas; { Дан массив A размера N. Сдвинуть циклически элементы массива влево на одну позицию. ... }
  •  'Задача 56' : Uses zadah56.pas; { Дан массив A размера N и целое число K (1 ... }
  •  'Задача 57' : Uses zadah57.pas; { В массиве размера N все элементы упорядочены по возрастанию кроме первого. Упорядочить массив ... }
  •  'Задача 58' : Uses zadah58.pas; { В массиве размера N удалить элемент с позицией K, 1≤K≤N ... }
  •  'Задача 59' : Uses zadah59.pas; { В массиве размера N удалить элемент с позиции от K до L включительно, 1≤K<L≤N. Вывести размер полученного массива и его содержимое ... }
  •  'Задача 6' : Uses zadah6.pas; { Для целых чисел N>2, A и B, наполнить и вывести массив размера N первый элемент которого равен A, второй равен B, а каждый последующий элемент равен сумме всех предыд ... }
  •  'Задача 60' : Uses zadah60.pas; { В массиве размера N удалить все нечетные элементы. Вывести размер полученного массива и его содержимое ... }
  •  'Задача 61' : Uses zadah61.pas; { В массиве размера N удалить все четные элементы. ... }
  •  'Задача 62' : Uses zadah62.pas; { В массиве размера N>2 удалить все нечетные элементы. Условный оператор не использовать ... }
Else
 writeln('Ничего не выбрано!');
End;Program pas2245;
Program pas2245..