Практикум по программированию на языке Turbo Pascal. Часть 1. Портнягина В.В - 100 стр.

UptoLike

ВУЗ: 

КамчатГТУ | Петропавловск-Камчатский

Составители: 

Рубрика: 

2.
В таблицу занесена последовательность из 10 чисел, взятых в проме-
жутке от –5 до 5. Найти:
а) наименьший член последовательности;
б) наименьший из положительных членов;
в) наибольшее из всевозможных попарных произведений.
3. Заданы матрица размером N * N и число К. Разделить элементы К-й
строки на диагональный элемент, расположенный в этой строке.
Вариант 4
1. В заданном массиве В[1 : 6] найти индекс элемента, равного числу Р.
Предусмотреть случай, когда такого элемента не будет.
2. Найти сумму элементов одномерного массива размером 4. Разделить
каждый элемент исходного массива на полученное значение. Результат полу-
чить в том же массиве. Напечатать в одной строке.
3. В матрице А[1 : X, 1 : R] найти количество элементов, которые по
модулю меньше заданного числа Т.
Вариант 5
1. В массиве А[1 : 10] поменять местами элементы 2 и 7.
2. Решить уравнение ах = b для пяти пар значений а и b, заданных в ви-
де двух массивов. Результат поместить в массив X.
3. Из предложенного одномерного массива длины N сформировать
двумерный массив так, чтобы первая строка нового массива содержала чет-
ные по номеру элементы исходного массива, а вторая – нечетные (предусмот-
реть случай нечетности N).
Вариант 6
1. Заполнить линейный массив из N элементов числами от –15 до 15 и
вывести на экран сумму всех его отрицательных элементов.
2. В массиве А [1:10] определить:
а) количество элементов, которые меньше –3;
б) номер первого такого элемента (если он есть);
в) номер последнего такого элемента.
3. Массив А[1 : N, 1 : M] содержит два одинаковых элемента. Требуется
напечатать их индексы.
Вариант 7
1. В произвольном одномерном массиве поменять местами элементы в
парах «элемент с нечетным номером – элемент с четным номером» (дополни-
тельные массивы не использовать).
100
    2. В таблицу занесена последовательность из 10 чисел, взятых в проме-
жутке от –5 до 5. Найти:
    а) наименьший член последовательности;
    б) наименьший из положительных членов;
    в) наибольшее из всевозможных попарных произведений.

    3. Заданы матрица размером N * N и число К. Разделить элементы К-й
строки на диагональный элемент, расположенный в этой строке.

    Вариант 4
    1. В заданном массиве В[1 : 6] найти индекс элемента, равного числу Р.
Предусмотреть случай, когда такого элемента не будет.

    2. Найти сумму элементов одномерного массива размером 4. Разделить
каждый элемент исходного массива на полученное значение. Результат полу-
чить в том же массиве. Напечатать в одной строке.

    3. В матрице А[1 : X, 1 : R] найти количество элементов, которые по
модулю меньше заданного числа Т.

    Вариант 5
    1. В массиве А[1 : 10] поменять местами элементы 2 и 7.

     2. Решить уравнение ах = b для пяти пар значений а и b, заданных в ви-
де двух массивов. Результат поместить в массив X.

     3. Из предложенного одномерного массива длины N сформировать
двумерный массив так, чтобы первая строка нового массива содержала чет-
ные по номеру элементы исходного массива, а вторая – нечетные (предусмот-
реть случай нечетности N).

    Вариант 6
    1. Заполнить линейный массив из N элементов числами от –15 до 15 и
вывести на экран сумму всех его отрицательных элементов.

    2. В массиве А [1:10] определить:
    а) количество элементов, которые меньше –3;
    б) номер первого такого элемента (если он есть);
    в) номер последнего такого элемента.

    3. Массив А[1 : N, 1 : M] содержит два одинаковых элемента. Требуется
напечатать их индексы.

    Вариант 7
    1. В произвольном одномерном массиве поменять местами элементы в
парах «элемент с нечетным номером – элемент с четным номером» (дополни-
тельные массивы не использовать).
                                  100

Страницы