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

Тема: Программирование с использованием одномерных массивов.

Необходимые сведения

Отладка программ с использованием режима F4.

Текущий просмотр значений переменных с помощью команды CTRL-F4.

Пример задания: Составить программу для вычисления значений функции и вывода на печать положительных значений функции с использованием массивов:

при x= 0,0.5, 1.0, 1.5,…2.5

Вариант программы

Const N = 6;

Var

K, L : Integer; X : Rael;

Y : Array[1..N] Of Real;

Begin

For L := 1 To N Do

Begin

X:= 0.5*(I –1); Y[L] =sin(PI * 0.25 X)+cos(PI*0.25*X);

If Y[L] > 0 Then WriteLn(‘x=’, X:8:4, ‘y=’, Y:8:4)

End;

End.

Варианты заданий:

1. Для значений М=1, 2,…,N вычислить число сочетаний из N по М и занести результаты в массив С=(С₁,С₂,…,С_N), используя

C_i= n!/ ( i !(n – 1)!). Отсортировать методом перестановок по

возрастанию. На печать вывести массив С до сортировки и после

нее. Здесь числа N > 0, M > 0, N > M ввести с клавиатуры.

2. Вычислить значение выражения при М =1,2,3,…, N

.

Значения напечатать и записать в массив В. Массив В отсортировать по убыванию через поиск минимального элемента и напечатать результат. N ввести с клавиатуры.

3. Сформировать S – массив вещественных чисел, отсортировать по возрастанию методом перестановок и напечатать:

число N > 0 ввести с клавиатуры.

4. Вычислить и записать в массив значения функции при изменении x от x_нач до x_кон с шагом h. Массив значений отсортировать по убыванию методом перестановок и напечатать.

a =2.14; b= –4.21; c= 3.25;

x_нач = –4.5, x_кон= –33.5, h= 0.5;

5. Сформировать массив чисел

и отсортировать по возрастанию через поиск максимального

элемента. N ввести с клавиатуры.

6. Сформировать массив значений функции , для x_нач £ x £ x_кон с шагом h.

A= – 1.14, B= – 0.21, C= 3.25; x_нач = 0.5, x_кон =2.5, h= 0.5.

Перед выводом на экран массив отсортировать методом перестановок по возрастанию.

7. Записать в вещественный массив числа

, k= 1,2,…N. Отсортировать

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

8. Вычислить значения функции в точках

, где k=1,2,…,11 , h= (b – a)*0.1 , b =13, N= 12.

Значения отсортировать по возрастанию методом перестановок и

напечатать.

9. Вывести на печать значения функции ,

предварительно сформировав из них массив чисел. Массив

отсортировать по убыванию через поиск максимального

элемента. А= 0.1 , В= –4 , С = 6, x₁= 0.5 , x₂= 1.5 , h = 0.1

10. Заполнить массив значениями

отсортировать по возрастанию методом перестановок и

напечатать результат.

11. Вывести на печать значение функции y (x₁) до и после сортировки по убыванию методом перестановок

.

.

Значения x_нач , x_кон , N ввести с клавиатуры.

12. Заполнить массив Q значениями и напечатать, отсортировав по возрастанию через поиск максимального элемента. N ввести с клавиатуры.

13. Вычислить значение функции, записать в массив, отсортировав по убыванию методом перестановок и напечатать: . x= 1.2, y = 1.1. Значение N ввести с клавиатуры.

14. Пусть a₁= u , b₁= v, a_k=a_k-1 +2b_k-1, b_k = 2a_k-1+ b_k-1, k= 2,3,4,…,N.

Найти Занести в массив и отсортировать по возрастанию через поиск максимального элемента. Числа u, v, N ввести с клавиатуры.

15. Сформировать массив чисел . Значение x ввести с клавиатуры. Число М = 8. Напечатать p, предварительно отсортировав по убыванию методом перестановок.

Контрольные вопросы

1. Какие команды находятся в разделе DEBUG главного меню системы TURBO PASCAL?

2. Может ли массив содержать один элемент? Ни одного?

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

4. Могут ли числа 1, 1ю41, 1.73, 2 быть элементами некоторого массива?