Учебно-методический комплекс дисциплины Практикум по структурированному программированию (стр. 7 )

Указание. Совершенное число – это число, равное сумме своих делителей, включая 1 (например, число шесть совершенно: 6=1+2+3).

6. * Составить программу решения задачи: Дана последовательность из ненулевых целых чисел, за которой следует 0. Определить сколько раз в этой последовательности меняется знак. (Например, в последовательности 1,-34,8,14,-5 знак меняется 3 раза).

Вариант №8

1.  Вычислить сумму s=1/n3 для n=1,2,3,…,40. Составить программы для каждого из трёх вариантов оператора цикла.

2.  Вычислить сумму d=(-1)I+1/(2*I-1), где I изменяется от 1 до введённого с клавиатуры числа n.

3.  Найти ошибки в следующем фрагменте программы: Var k, I, s: Integer; x, y: Real; k:=1; For I:=1 To 64 Do Begin I:=2*I; k:=k+I End.

4.  Составить программу: В ЭВМ по очереди вводится рост учащихся, определить средний рост.

5.  Задаётся дата в виде: число, месяц, год и требуется составить программу определения завтрашнего числа. Не забудьте, что существуют високосные годы, в которых 29 дней в феврале.

Указание. Високосный год–это тот, у которого номер делится на 400, но не делится на 100 или у которого номер делится на 4.

6. * Составить программу решения задачи: Дано 10 чисел. Определить сколько из них больше своих «соседей», т. е. предыдущего и последующего.

Вариант №9

1.  Даны целые числа x1, x2,…, x55. Составить программу для вычисления величины L=x1*(x2+x3)*(x4+x5+x6)*(x7+x8+x9+x10)*…*(x46+x47+…+x55).

2.  Составьте программу вычисления суммы всех двузначных чисел.

3.  Сколько раз будет выполняться тело следующего оператора цикла:

k:=0; For I:=1 To k:=k+3 Do k:=k+1.

4.  С помощью оператора цикла напишите программу, которая требует от вас пароль, например 11, и если пароль верный заполняет все строки экрана словом “Молодец!” Если после пятой попытки пароль не верен, выйти из программы.

5.  Составьте программу определения в порядке убывания делителей данного числа.

6.  * Составить программу решения задачи: Определить, является ли заданное число совершенным, т. е. равным сумме своих положительных делителей, кроме самого этого числа(6=1+2+3).

Вариант №10

1.  Дана непустая последовательность положительных вещественных чисел x1,x2,…,xn (n заранее не известно), за которой следует отрицательное число. Вычислить величину: 1*x1+2*x2+…+(n-1)* xn-1 + n*xn. Составьте программу для каждого из трёх вариантов оператора цикла.

2.  Составьте программу определения максимального из всех введённых чисел (Признак окончания работы –0).

3.  Найти ошибки в следующем фрагменте программы:

Var k, I, s: Integer; x, y: Real; k:=0; For I:=0 To 42 Begin k:=k+I; s:=x+I*k End.

4.  Дана непустая последовательность ненулевых целых чисел, за которой следует ноль. Составить программу позволяющую определить сколько раз в этой последовательности меняется знак. (Например, в последовательности 1, -34, 8, 14, -6 знак меняется три раза).

5.  Составьте программу позволяющую найти первый отрицательный член последовательности cos(ctg(n)), где n=1,2,3,…

6.  * Составить программу решения задачи: Числа Фибоначчи определяются по формуле f0=f1=1;fn=fn-1+fn-2. Найти первое число Фибоначчи больше m.

Лабораторная работа № 5

Массивы

Цель: овладеть практическими навыками работы с массивами, особенностями их ввода и вывода, приобрести навыки алгоритмизации и программирования циклических структур и структур с вложенными циклами, способами ввода и вывода матриц.

Студент должны знать: способы описания массивов; способы ввода и вывода одномерных массивов и матриц; приемы накопления суммы или произведения, запоминания результатов; нахождение наибольшего и наименьшего элемента массива; правила организации вложенных циклов с учетом порядка перебора элементов матрицы; способы сортировки массивов.

Студент должны уметь: разработать алгоритм решения в соответствии с заданием; составить программу решения задачи; подготовить тест для проверки программы; описать массив; организовать ввод и вывод массива.

Теоретические вопросы:

1.  Что такое массив?

2.  Способы ввода массивов.

3.  Как организовать вывод матрицы в общепринятом виде?

4.  В чем состоит особенность организации цикла при обработке массивов?

5.  Как организовать вывод нижней треугольной матрицы в общепринятом виде?

6.  Назовите способы сортировки массива.

7.  Метод пузырька.

8.  Метод последовательных минимумов.

9.  Можно ли в ходе выполнения программы изменить размерность массива?

10.  Верно, ли что тип элементов массива может быть любым?

Вариант №1

1.  Вычислить сумму элементов массива А (100).

2.  Найти количество и вычислить сумму отрицательных элементов массива В(70).

3.  Вычислить и запомнить сумму и количество положительных элементов каждого столбца матрицы С(10х15). Результаты отпечатать в виде двух строк.

4.  Дан вещественный массив D(60), упорядочить его по убыванию.

5* Дана матрица Т(NхM), N<=20, M<=15.Найти строку с наибольшей и наименьшей суммой элементов. Вывести на печать найденные строки и суммы их элементов.

Вариант № 2.

1.  Вычислить среднее арифметическое значение элементов целочисленного массива A(80).

2.  Вычислить сумму и число элементов матрицы К(15х15), находящихся над главной диагональю.

3.  Найти наибольший и наименьший элементы матрицы R(KхN), K<=20, N<=10 и поменять их местами.

4.  Отсортировать элементы матрицы В(20х20) по возрастанию. Использовать метод «пузырька».

5* Получить массив В из массива А удалением n-ой строки и k-ого столбца, если Var A: array [1..20,1..20] of Boolean; B: array[1..19,1..19] of Boolean; n, k: 1..20.

Вариант № 3.

1.  Определить минимальный элемент массива Х(30) и его порядковый номер.

2.  Определить сумму элементов массива L(20), кратных трем.

3.  Найти в каждой строке матрицы P(N, N), N<=15, наибольший элемент и поменять его местами с элементом главной диагонали. Отпечатать полученную матрицу в общепринятом виде.

4.  Упорядочить элементы одномерного массива по убыванию.

5* Определить, является ли заданная целая квадратная матрица 9-го порядка

магическим квадратом, т. е. матрица, в которой сумма элементов во всех строках и столбцах одинакова.

Вариант № 4.

1.  Определить максимальный элемент массива В(50) и его порядковый номер.

2.  Переписать положительные элементы массива Х(70) в массив Y и подсчитать их количество.

3.  Для целочисленной матрицы N(10,10) найти для каждой строки число элементов, кратных 5, и наибольший из полученных результатов.

4.  Упорядочить по возрастанию элементы каждого столбца матрицы X(n, n).

5* Дана (построчно) вещественная матрица размером 7х4. Переставляя её строки и столбцы, добиться того, чтобы наибольший элемент (один из них) оказался в верхнем левом углу.

Вариант № 5.

1.  Вычислить количество нулевых элементов массива С(40) и их порядковые номера.

2.  Дана целочисленная матрица размерностью (10х10). Заполнить его следующим образом:

1 2 … 10

11 12 … 20

21 22 … 30

……………..

91 92 … 100

3.  Найти в каждой строке наибольший элемент и поменять его местами с элементом главной диагонали. Отпечатать полученную матрицу в общепринятом виде.

4.  Упорядочить одномерный массив Х(70) по не убыванию.

5* Найти произведение матриц А(5х5) на В(5х5).

Вариант № 6.

1.  Найти максимальный и минимальный элементы массива D(80) и вычислить их разность.

2.  Дано следующее описание: var a: array[1..10,1..10] of integer;. Заполнить массив следующим образом:

1 2 … 10

0 1 … 9

0 0 … 8

0 0 … 1

3.  Найти наибольший и наименьший элементы матрицы R(12х15) и поменять их местами.

4.  Элементы массива Х(500) отсортировать по убыванию.

5*Определить, является ли заданная матрица 10-го порядка ортонормированной, т. е. такой, в которой скалярное произведение различных строк равно 0, а скалярное произведение каждой строки на себя равно 1.

Вариант № 7.

1.  Удвоить элементы массива В(50). И вывести оба массива в общепринятом виде.

2.  Вычислить среднее геометрическое элементов натурального массива Y(20).

3.  Найти сумму матриц K(12х15) и L(12х10).

4.  Упорядочить элементы матрицы А(13,15) по возрастанию в каждой строке. Использовать сортировку методом пузырька.

5* Определить, является ли заданная целая квадратная матрица 10-го порядка

симметричной относительно главной диагонали.

Вариант № 8.

1.  Расположить в массиве R сначала положительные, а затем отрицательные элементы массива Z(40).

2.  Найти строку с наибольшей и с наименьшей суммой элементов. Вывести на печать найденные строки и суммы их элементов.

3.  Для целочисленной матрицы N(10,10) найти для каждой строки число элементов, кратных пяти, и наибольший из полученных результатов.

4.  Дана вещественная матрица размером (20х30), упорядочить её строки по не убыванию суммы их элементов.

5* Из положительных элементов матрицы N(10,10) сформировать матрицу М(10, КМАХ), располагая их в строках матрицы подряд, где КМАХ - максимальное число положительных элементов строки матрицы N. Записать нули на место отсутствующих элементов. Отпечатать обе матрицы в общепринятом виде.

Вариант № 9.

1.  Определить сумму элементов массива N(50) кратных трём.

2.  Вычислить и запомнить сумму и число положительных элементов каждого столбца матрицы А(10,15). Результаты отпечатать в виде двух строк.

3.  Упорядочить по убыванию элементы главных диагоналей квадратной матрицы С(10,10).

4.  Дана вещественная матрица размером 20х30. Упорядочить её строки по не убыванию.

5* Транспонировать матрицу F(10,8) и вывести на печать элементы главной диагонали и диагонали, расположенной под главной. Результаты разместить в двух строках.

Вариант № 10.