Паскаль
 

Помогите пожалуйста срочно написать код к таким задачкам:
1)Найти вторые минимальный и максимальный элементы заданного с клавиатуры целочисленного вектора V длиной n элементов.
2)Сдвинуть на k шагов вправо элементы заданного вектора An.
3)В заданном целочисленном векторе An определить самую длинную последовательность идущих подряд одинаковых элементов.
4)В заданном целочисленном массиве Anm поменять местами вторые минимальный и максимальный элементы массива.
5)В заданном целочисленном векторе An поменять местами вторые максимальный и минимальный элементы вектора.
6)В заданном целочисленном векторе An найти максимальное число слева, не входящее в вектор.
7)В заданном целочисленном векторе An найти минимальное число справа, не входящее в вектор.
8)В заданном целочисленном массиве Ann поменять местами максимальные элементы главной и побочной диагоналей.
9)Произвести сортировку по возрастанию элементов заданного целочисленного вектора An.
10)В заданном целочисленном массиве Ann поменять местами строку с наименьшей суммой элементов и столбец с наибольшей.
11)В заданной строке, содержащей все символы клавиатуры кроме кириллицы, определить сумму всех цифр, отдельно количество гласных и согласных букв.
12)В заданной строке, содержащей все символы клавиатуры кроме кириллицы, удалить все повторения символов.
13)В заданном целочисленном массиве Ann определить суммы четных элементов главной и нечетных элементов побочной диагоналей.
14)В заданном целом положительном числе N определить наибольшую цифру слева, не входящую в число.
15)В заданном целом положительном числе N определить наименьшую цифру справа, не входящую в число.
16)В заданном целочисленном массиве Ann определить максимальный элемент, находящийся во внешнем слое элементов.
17)В заданном целочисленном массиве Ann определить минимальный элемент, находящийся во внешнем слое элементов.
18)По заданной точности eps и значению аргумента x определить значение ряда Фурье для переключательной функции:

F(x)=4(sin( x) + sin(3x)/3 + sin(5x)/5 + …)/π

(для x=1,57 значение f(x)=1,0)
19)Транспонировать заданный квадратный массив Ann.
20)В заданном типизированном файле целых чисел поменять местами минимальное и максимальное число.
21)В заданном типизированном файле целых чисел удалить элементы, расположенные между минимальным и максимальным числами. Буду очень благодарен и признателен.

steamangarsk, форум - не онлайн решебник!
Выкладывайте ваши программы и задавайте вопросы, что не получается.

Мне просто очень нужно, а в паскале я новичок и толком плохо знаю его.

Ну так какие попытки были? Что не получается?
Вам за час 20 задач написать???

нет, мне надо до следующей неделе написать(

Анжелика, но ведь посмотрите, как здорово: готовое решение вопроса о том, чем бы заняться в новогоднюю ночь. И Вам, и мне, и другим программистам. Вот хорошо-то... :D:D:D

Так вы поможете?

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

Что вы так сразу негативно реагируете то? Я же не прошу вас помочь написать программы за один день, мне они нужны до следующей недели. Делайте все свои предновогодние дела, а если будет свободное время то помогите пожалуйста. Вам же все равно это дело доставляет удовольствие, вы же профессиональный программист. Не отказывайте в помощи пожалуйста когда она очень нужна. Ну а так если не хотите помочь то это ваше дело. Но помощь очень нужна.

Профессиональному программисту доставляет удовольствие решение интересных задач! А на таких задачах, что вы выложили, обычно и учатся программировать. И кстати, задачи одной тематики. Здесь создала профиль группа студентов?
Ждите. Может кто и поможет.