Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Программирование и алгоритмические языки

.pdf
Скачиваний:
3
Добавлен:
05.02.2016
Размер:
681.98 Кб
Скачать

Задание

п/п

Водномерном массиве найти самый большой элемент и заменить им все нулевые 32 элементы.

Водномерном массиве найти все элементы, меньшие заранее заданного числа, и 33 из них сформировать одномерный массив.

В одномерном массиве все элементы с четными индексами уменьшить в четыре 34 раза.

35

В одномерном массиве вычислить количество нулевых элементов.

 

 

36

В одномерном массиве первый элемент поменять местами со вторым элементом,

 

третий элемент с четвертым элементом и так далее.

ЛАБОРАТОРНАЯ РАБОТА № 7

ДВУХМЕРНЫЕ МАССИВЫ В СРЕДЕ ПРОГРАММИРОВАНИЯ TURBO PASCAL 7.0

ГРУППА БАк-1-12

СОДЕРЖАНИЕ РАБОТЫ

1.Изучить возможности среды программирования Turbo Pascal 7.0, которые позволяют использовать в программе двухмерные массивы.

2.Выполнить анализ задания в соответствии с вариантом.

3.Составить программу на языке программирования Turbo Pascal 7.0 для выполнения поставленного задания.

ПОРЯДОК ВЫПОЛНЕНИЯ ЛАБОРАТОРНОЙ РАБОТЫ

1.Ввести двухмерный массив поэлементно с помощью клавиатуры или получить его, используя генератор случайных чисел. Двухмерный массив может быть целочисленного или вещественного типа. Количество элементов в двухмерном массиве должна быть не менее десяти.

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

3.Выполнить необходимые преобразования над исходным двухмерным массивом,

атакже выполнить необходимые вычисления.

4.Вывести на экран монитора преобразованный двухмерный массив в виде таблицы чисел, а также вывести результаты вычислений.

ВАРИАНТЫ ЗАДАНИЙ

Задание

п/п

1В двухмерном массиве вычислить сумму положительных элементов всех четных строк.

2В двухмерном массиве каждый отрицательный элемент возвести в куб.

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

3поменять местами элементы, расположенные симметрично относительно диагонали, противоположной главной.

Задание

п/п

В двухмерном массиве элементы каждой строки упорядочить по уменьшению

4значений элементов.

5В двухмерном массиве вычислить произведение элементов каждой строки.

Вдвухмерном массиве вычислить количество столбцов, которые содержат хотя бы

6один отрицательный элемент.

Вдвухмерном массиве найти самый маленький элемент и вычислить суммы всех

7элементов столбца и всех элементов строки, которые содержат этот элемент.

8В двухмерном массиве найти все отрицательные элементы и получить из них одномерный массив.

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

10В двухмерном массиве вычислить произведение отрицательных элементов всех нечетных столбцов.

Вдвухмерном массиве вычислить сумму всех элементов, расположенных выше

11главной диагонали.

Вдвухмерном массиве первый столбец поменять местами с последним столбцом,

12второй столбец с предпоследним столбцом и так далее.

13В двухмерном массиве исключить столбец с заранее заданным индексом.

14В двухмерном массиве вычислить сумму элементов, произведение индексов столбца и строки которых нечетное число.

15В двухмерном массиве поменять знаки элементов всех четных строк.

16В двухмерном массиве вычислить количество столбцов, сумма элементов которых меньше нуля, равна нулю или больше нуля.

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

17которых нечетное число, и получить из них одномерный массив.

18

В двухмерном массиве вычислить частное от деления произведения всех положительных элементов на произведение всех отрицательных элементов.

п/п

Задание

 

 

 

 

 

 

 

19

В двухмерном массиве вычислить сумму отрицательных элементов всех нечетных

строк.

 

 

20

В двухмерном массиве каждый положительный элемент возвести в квадрат.

 

 

 

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

21

поменять местами элементы, расположенные симметрично относительно главной

 

диагонали.

 

 

22

В двухмерном массиве элементы каждого столбца упорядочить по увеличению

 

значений элементов.

 

 

23

В двухмерном массиве вычислить сумму элементов каждого столбца.

 

 

24

В двухмерном массиве вычислить количество строк, которые содержат хотя бы

один положительный элемент.

 

 

25

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

элементов столбца и всех элементов строки, которые содержат этот элемент.

 

 

26

В двухмерном массиве найти все положительные элементы и получить из них

 

одномерный массив.

 

 

27

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

 

вычислить произведение элементов диагонали, противоположной главной.

 

 

28

В двухмерном массиве вычислить произведение положительных элементов всех

 

четных столбцов.

 

 

29

В двухмерном массиве вычислить произведение всех элементов, расположенных

ниже диагонали, противоположной главной.

 

 

30

В двухмерном массиве первую строку поменять местами с последней строкой,

вторую строку с предпоследней строкой и так далее.

 

 

31

В двухмерном массиве исключить строку с заранее заданным индексом.

 

 

32

В двухмерном массиве вычислить произведение элементов, произведение

 

индексов столбца и строки которых четное число.

Задание

п/п

33В двухмерном массиве поменять знаки элементов всех нечетных столбцов.

Вдвухмерном массиве вычислить количество строк, сумма элементов которых

34меньше нуля, равна нулю или больше нуля.

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

35которых четное число, и получить из них одномерный массив.

Вдвухмерном массиве вычислить частное от деления суммы всех положительных

36элементов на сумму всех отрицательных элементов.

ЛАБОРАТОРНАЯ РАБОТА № 8

МНОЖЕСТВА, ЗАПИСИ И СТРОКИ В СРЕДЕ ПРОГРАММИРОВАНИЯ TURBO

PASCAL 7.0

ГРУППА БАк-1-12

СОДЕРЖАНИЕ РАБОТЫ

1.Изучить возможности среды программирования Turbo Pascal 7.0, которые позволяют использовать в программе множества, записи и строки.

2.Выполнить анализ задания в соответствии с вариантом.

3.Составить программу на языке программирования Turbo Pascal 7.0 для выполнения поставленного задания.

ПОРЯДОК ВЫПОЛНЕНИЯ ЛАБОРАТОРНОЙ РАБОТЫ

1.Ввести множество, запись или строку с помощью клавиатуры.

2.Вывести на экран монитора исходную запись, множество или строку.

3.Выполнить необходимые преобразования над исходным множеством, записью или строкой, а также выполнить необходимые вычисления.

4.Вывести на экран монитора преобразованное множество, запись или строку, а также вывести результаты вычислений.

ВАРИАНТЫ ЗАДАНИЙ

Задание

п/п

Задана строка текста длиной не менее двадцати символов. Определить, сколько

1символов русского и английского алфавитов имеется в этой строке текста.

Заданы два множества, первое состоит из произвольных десяти чисел в диапазоне

2от 25 до 75, второе состоит из произвольных десяти чисел в диапазоне от 50 до 100. Получить новое множество, состоящее из чисел, которые есть или только в

первом множестве, или только во втором множестве.

Задана запись, имеющая три поля: первое площадь нижнего основания

3усеченного конуса, второе площадь верхнего основания усеченного конуса, третье высота усеченного конуса. Найти объем и площадь всей поверхности

Задание

п/п

такого усеченного конуса.

4Задана строка текста длиной не менее двадцати символов. Определить, сколько пробелов имеется в этой строке текста.

Заданы два множества, первое состоит из произвольных десяти чисел в диапазоне

5от 75 до 175, второе состоит из произвольных десяти чисел в диапазоне от 25 до 125. Получить новое множество, состоящее их чисел, которые лежат в диапазоне

от 25 до 175 и которые отсутствуют и в первом множестве, и во втором множестве. Задана запись, имеющая три поля: первое первая сторона параллелограмма,

6второе вторая сторона параллелограмма, третье угол между первой и второй сторонами параллелограмма. Найти площадь и периметр такого

параллелограмма.

Задана строка текста длиной не менее двадцати символов и заданы два отдельных

7символа. Выполнить замену первого символа на второй символ во всей строке текста.

8Задано множество целых чисел от 1 до 255. Получить из этого множества новое множество, в котором отсутствуют числа, кратные 2.

Заданы три записи, каждая из которых имеет два поля: первое действительная часть, второе мнимая часть комплексного числа. Получить третью запись, поля

9которой содержат результат сложения двух комплексных чисел из первой и второй записей.

Задана строка текста длиной не менее двадцати символов. Выполнить перевод

10всех символов этой строки из верхнего регистра в нижний, а из нижнего регистра в верхний.

11

Задано множество целых чисел от 1 до 255. Получить из этого множества новое множество, в котором присутствуют только четные числа.

Задание

п/п

Заданы три записи, каждая из которых имеет два поля: первое действительная часть, второе мнимая часть комплексного числа. Получить третью запись, поля

12которой содержат результат умножения двух комплексных чисел из первой и второй записей.

Задана строка текста длиной не менее двадцати символов и заданы два отдельных

13символа. Выполнить замену всех символов в строке на первый отдельный символ, а всех пробелов в строке на второй отдельный символ.

14

Задано множество целых чисел от 1 до 255. Получить из этого множества новое

 

множество, в котором отсутствуют числа, кратные 3.

 

 

 

Заданы три записи, каждая из которых имеет два поля: первое действительная

15

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

 

которой содержат результат вычитания двух комплексных чисел из первой и

 

второй записей.

 

 

16

Задана строка текста длиной не менее двадцати символов. Выполнить перевод

всех первых символов каждого слова этой строки в верхний регистр.

 

 

17

Задано множество целых чисел от 1 до 255. Получить из этого множества новое

 

множество, в котором присутствуют только нечетные числа.

 

 

 

Заданы три записи, каждая из которых имеет два поля: первое действительная

18

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

которой содержат результат деления двух комплексных чисел из первой и второй

 

записей.

 

 

19

Задана строка текста длиной не менее двадцати символов и задан один отдельный

 

символ. Вычислить, какое количество раз этот символ встречается в строке текста.

 

 

 

Задано множество, содержащее все месяцы года от января до декабря. Получить

20

из этого множеств новое множество путем исключения четырех произвольных

 

месяцев.

Задание

п/п

Задана запись с вариантами, имеющая одно поле длиной четыре байта (тип

21LongInt). Получить значения каждого из четырех байт (тип Byte), составляющих это поле записи, по отдельности.

Задана строка текста длиной не менее двадцати символов и задан один отдельный

22символ. Вычислить все порядковые номера символов в строке, совпадающие с заданным отдельным символом.

Задано множество, содержащее все цвета светового спектра от красного до

23фиолетового. Получить из этого множеств новое множество путем исключения трех произвольных цветов.

Задана запись с вариантами, имеющая четыре поля символьного типа (тип Char)

24каждое. Получить значения каждого из четырех байт (тип Byte), составляющих эти четыре поля записи, по отдельности.

Задана строка текста длиной не менее двадцати символов и задан один отдельный

25символ. Вычислить, какое максимальное количество расположенных подряд таких отдельных символов имеется в строке текста.

Задано множество, содержащее все дни недели от понедельника до воскресенья.

26Получить из этого множеств новое множество путем исключения двух произвольных дней.

Задана запись с вариантами, имеющая два поля длиной два байта (тип Integer)

27каждое. Получить значения каждого из четырех байт (тип Byte), составляющих эти два поля записи, по отдельности.

Задана строка текста длиной не менее двадцати символов и задан один отдельный

28символ. Вычислить все порядковые номера символов в строке, не совпадающие с заданным отдельным символом.

Задано множество, содержащее все сезоны года от весны до зимы. Получить из

29этого множеств новое множество путем исключения одного произвольного сезона.

Задана запись с вариантами, имеющая два поля логического типа (тип Boolean)

30каждое. Получить значения каждого из двух байт (тип Byte), составляющих эти два поля записи, по отдельности.

Задание

п/п

31Задана строка текста длиной не менее двадцати символов. Определить, сколько слов, разделенных пробелами, имеется в этой строке текста.

Заданы два множества, первое состоит из произвольных десяти чисел в диапазоне

32от 1 до 100, второе состоит из произвольных десяти чисел в диапазоне от 50 до 150. Получить новое множество, состоящее из чисел, которые есть и в первом

множестве, и во втором множестве.

Задана запись, имеющая три поля: первое высота параллелепипеда, второе

33ширина параллелепипеда, третье глубина параллелепипеда. Найти объем и площадь всей поверхности такого параллелепипеда.

Задана строка текста длиной не менее двадцати символов. Определить, сколько

34прописных символов русского и английского алфавитов, и сколько строчных символов русского и английского алфавитов имеется в этой строке текста.

Заданы два множества, первое состоит из произвольных десяти чисел в диапазоне

35от 1 до 150, второе состоит из произвольных десяти чисел в диапазоне от 50 до 200. Получить новое множество, состоящее их чисел, которые есть только в

первом множестве и которых нет во втором множестве.

Задана запись, имеющая три поля: первое первая сторона треугольника, второе

36вторая сторона треугольника, третье третья сторона треугольника. Найти площадь и периметр такого треугольника.