Готовая контрольная работа

var D_vnesh, d_vnutr, S: real;

begin

D_vnesh:=StrToFloat(Edit1.Text);

d_vnutr:=StrToFloat(Edit2.Text);

if D_vnesh

Задание 1. Разработать макет формы и написать программный код для решения задачи. Подготовить текстовой пример для проверки работы программы.

Вычислить площадь кольца, внутренний диаметр которого d, а внешний D.



Задание 2. Разработать макет формы и написать программный код для табулирования функции f(x) на отрезке [x0; xk] с шагом h.





Задание 3. Разработать алгоритм, макет формы, программный код и тестовый пример для проверки работы программы.

В заданном массиве a1, a2, … , an найти среднее гармо¬ническое, а затем каждый положительный элемент массива увеличить на величину среднего гармонического.

Указание. Среднее гармоническое вычисляется по формуле:



Задание 4. Написать программу для приложения, реализующего выбор пользователем различных параметров для текстового окна.

нет