Лабораторные роботы по дисциплине: Программирование. Вариант №2

Лабораторная работа №1
Задание:
Разработать программу для вычисления:
1) значения заданного арифметического выражения (см. скрин)
2) значения заданной функции
d = (x-y)+arctg(x), при x>y;(y-x)^3+arctg(x), при y>x;(y+x)^3+0.5, при x=y.
и вывода на экран полученных результатов.
Значения исходных данных выбираются произвольно. Ввод исходных данных организовать любым известным вам способом (использовать не менее двух способов).
Результат работы программы:

Лабораторная работа №2
Задание:
Написать программу для вычисления заданного выражения и вывода на экран полученного значения, используя заданный циклический оператор
-0,18 + 0,20 – 0,22 +...+ 0,36 While
Результат работы программы:

Лабораторная работа №3
Общий текст задания для всех вариантов:
Задана последовательность значений элементов некоторого массива до и после преобразования по некоторому правилу. Определите алгоритм преобразования и напишите программу, которая:
1) формирует массив из заданного количества случайных целых чисел в заданном диапазоне и выводит элементы массива на экран;
2) по определенному вами алгоритму преобразовывает этот массив и выводит на экран элементы преобразованного массива.
3) производит заданные вычисления и выводит результат на экран.
Указания:
- преобразование массива оформить в виде процедуры;
- заданные вычисления оформить в виде функции;
- все выводы на экран осуществлять в основной программе.
Массив C = (–4, 9, 5, –8, –5, 4, 0) преобразован к виду C = (–8, 0, 0, –16, –10, 0, 0). Размер массива C - 40 элементов из диапазона [–23,23]. Вычислить сумму нечетных элементов преобразованного массива.
Результат работы программы:

Лабораторная работа №4
Задание:
Написать программу, которая выводит на экран изображение заданного графического объекта (с соблюдением заданной цветовой гаммы). (см. скрин)
Результат работы программы:

Лабораторная работа №5
Задание:
Разработать программу, в которой необходимо выполнить следующие действия:
- Описать новый тип – запись, состоящую из двух полей:
Stroka Dlina
- Ввести с клавиатуры заданную последовательность символов и записать ее в переменную строкового типа;
- Преобразовать строку в соответствии со своим вариантом;
- В поле записи Stroka переписать преобразованную строку, а в поле Dlina – длину этой строки;
- Вывести содержимое полей записи на экран;
abc1_TP7.0ef Удалить 5 символов, начиная с шестого.(процедура delete)
Результат работы программы:

Все работы выполнены на языке Pascal и успешно зачтены!