
- •Глава 6. Программирование в среде Delphi
- •§ 1 Введение
- •§ 2 Работа со средой Delphi
- •§ 3 Особенности программ, работающих под управлением ос Windows
- •§ 4 Реализация линейных алгоритмов на языке Object Pascal
- •§ 5 Общая структура программы
- •I,j: integer;
- •§ 6 Система типов языка Object Pascal
- •Var a,b,c: real;
- •§ 7 Стандартные функции языка Object Pascal для работы с числовыми и символьными типами
- •§ 8 Ввод и вывод данных
- •Var a:string;
- •§ 9 Реализация разветвляющихся алгоритмов
- •§ 10 Использование массивов и циклов
- •§ 11 Компонент Memo и его использование для ввода элементов массивов
- •§ 12 Использование таблицы для вывода двумерных массивов на экран
- •§ 13 Использование процедур и функций пользователя
- •X: array[1..20,1..2] of integer;
- •I,j,m,n:integer;
- •X: array[1..20,1..2] of integer;
- •I,j,m,n:integer;
- •Глава 7. Задачи по программированию для индивидуального решения
- •§ 1 Линейная программа
- •§ 2 Библиотечные функции в линейных программах
- •Угол — количество гр., количество минут мин., количество секунд сек.
- •Примечание
- •§ 3 Разветвляющиеся программы
- •Примечание
- •Прямые перпендикулярны
- •§ 4 Циклические программы. Использование массивов в программах
Глава 7. Задачи по программированию для индивидуального решения
§ 1 Линейная программа
1.1 Даны два действительных числа a и b. Получить их сумму, разность и произведение.
1.2 Дано действительное число x. Не пользуясь никакими другими арифметическими операциями, кроме умножения сложения и вычитания, вычислить 2x4 – 3x3 + 4x2 – 5x +6. Разрешается использовать как можно меньше умножений, сложений и вычитаний.
1.3 Даны действительные числа x, y. Не пользуясь никакими операциями, кроме умножения, сложения и вычитания, вычислить 3x2y2 – 2xy2 – 7x2y – 4y2 + 15xy + 2x2 – 3x + 10y + 6. Разрешается использовать как можно меньше умножений, сложений и вычитаний.
1.4 Дано действительное число x. Не пользуясь никакими другими арифметическими операциями, кроме умножения сложения и вычитания, вычислить 1 – 2x + 3x2 – 4x3 и 1 + 2x + 3x2 + 4x3. Разрешается использовать как можно меньше операций.
1.5 Написать программу для вычисления площади треугольного участка по заданным координатам его вершин. Значения координат задаются в метрах, площадь необходимо вычислить в гектарах и округлить до 0,1 га. Формула для вычисления площади:
Форма выдачи результата:
ПЛОЩАДЬ = значение S ГА.
1.6 Написать программу для вычисления площади четырехугольного участка по заданным значениям координат его вершин.
Формула для вычисления площади:
Значения координат задаются в метрах, площадь необходимо вычислить в гектарах. В программе предусмотреть округление вычисленного значения площади до 0,1 га.
Форма выдачи результата:
ПЛОЩАДЬ УЧАСТКА РАВНА значение S ГА.
1.7 Написать программу для вычисления площади треугольного участка по заданным значениям координат его вершин по формуле:
Значения координат задаются в метрах, площадь определить в гектарах с точностью до 0,001 га.
Форма выдачи результата:
ПЛОЩАДЬ РАВНА значение S ГА.
1.8 Написать программу для определения объема усеченного конуса, с высотой H м и параллельными основаниями с радиусами R1 м и R2 м. В программе предусмотреть округление объема до 0,001 м3. Формула для вычисления объема:
Форма выдачи результата:
ОБЪЕМ КОНУСА= значение V КУБ.М.
1.9 Написать программу для вычисления суммы вклада в сберегательный банк через N лет при условии, что начальная сумма вклада составляла A рублей, а процент годовых равен P%. Расчет выполняется по формуле сложных процентов:
В программе предусмотреть округление результата до 0,01 рубля.
Форма вывода результата:
СУММА ЧЕРЕЗ значение N ЛЕТ РАВНА значение S РУБ.
1.10 Дан прямоугольный параллелепипед. a, b, c — ребра прямоугольного параллелепипеда. Найти:
1)его диагональ
;
2)площадь полной
поверхности
;
3) объем
.
1.11 Дан обелиск. Нижнее и верхнее основание являются прямоугольниками, расположенными в параллельных плоскостях; противоположные боковые грани одинаково наклонены к основанию, но не пересекаются в одной точке.
1.12 Даны a, b и a1, b1 — стороны оснований, h — высота. Найти объем обелиска по формуле
V=h[ab+(a+a1)(b+b1)+a1b1]/6.
Форма выдачи результата:
ОБЪЕМ ОБЕЛИСКА= значение V КУБ.М.
1.13
Если известны координаты двух точек
X1Y1
и X2Y2
(рис. 7-1), то координаты X,
Y
точки, делящей отрезок 1–2 в отношении
,
можно определить по формулам:
.
X2Y2
n
m
X
Y
X1Y1
Рис. 7-1.
Написать программу для определения X, Y. Значения X1, Y1, X2,Y2 вводить в метрах. Координаты X, Y выводить в метрах в метрах с точностью до 0,1м.
Форма выдачи результата:
КООРДИНАТЫ ДЕЛЯЩЕЙ ТОЧКИ:
X = значение X, Y = значение Y.
1.14 Написать программу для вычисления поправки превышения за кривизну Земли и рефракцию:
f
— поправка
измеряется в метрах. Рефракция —
преломление светового луча в атмосфере
(поправку вычисляют для расстояний
более 300 м);
R — радиус Земли. R6371,1 км (в формуле перевести в м);
Si — длина линии в метрах между точками, где измеряется превышение.
Поправку округлять до 0.01 м.
Форма вывода результата: ПОПРАВКА= значение (м).
1.15 Написать программу для расчета общих годовых издержек на 1 га угодий в зависимости от площади территории P и пространственного расположения земель и хозяйственного центра:
г
де
K1
— коэффициент, характеризующий
конфигурацию земельной площади и
положение хозяйственного центра;
K2 — коэффициент, показывающий, во сколько раз путь по дорогам к данному участку длиннее, чем путь по прямой.
Значение Z округлить до 0,01.
Форма вывода результата:
ГОДОВЫЕ ИЗДЕРЖКИ= значение Z Р/ГА.
1.16 Написать программу для определения площади участка пашни, с баллом бонитировки Б2 (балл экономической оценки земли, оценивается по 100-бальной шкале), которую хозяйство должно отдать в обмен на полученный им участок с площадью S1 и баллом Б1:
Значение S2 S1 округлять до 0,01 га.
Форма вывода результата:
ПОДЛЕЖИТ ВОЗВРАТУ значение ГА ПАШНИ.
1.17 Написать программу для вычисления поправки за кривизну Земли в длину измеренной линии:
г
де
S
— длина линии в метрах, R-
радиус Земли. R6371,1
км. Поправку вычислить в сантиметрах и
округлить до 0,1 см.
Перевод в единые единицы измерения предусмотреть в формуле самостоятельно.
1 .18 Написать программу для определения оптимальной площади территории по формуле:
г
де
a1, a2,
a3, a4,
— коэффициенты уравнений переменных
частей годовых издержек (возможные
значения 1-100);
K1 — коэффициент, значение которого определяется в зависимости от конфигурации земельных площадей и положения хозяйственного центра (возможные значения 1-100);
K2 — дорожный коэффициент, показывающий, во сколько раз путь по дорогам к данному земельному участку длиннее пути по прямой (возможные значения 1-100);
Г — грузооборот на 1 га земельной площади в тоннах;
— переменная часть транспортных расходов (0,1-1);
n — количество переездов в день;
D — среднегодовые затраты на полевые работы на 1 га (человеко-дней);
Sp — тариф за 1 км пробега автомашины;
Sd — оплата одного человеко-дня;
— коэффициент использования вместимости автомашин (0,1-1);
— коэффициент использования автопробега (0,1-1) ;
Е — вместимость автомашины (0,1-1) ;
V — скорость движения автомашин;
Np — продолжительность рабочего дня.
Результат округлить до 0,01 га.
Форма вывода результата:
ОПТИМАЛЬНАЯ ПЛОЩАДЬ = значение P ГА.
1.19
С
оставить
программу для вычисления длины окружности
C и площади круга S,
если известен радиус r по
формулам:
Форма вывода результатов:
ДЛИНА ОКРУЖНОСТИ С РАДИУСОМ значение r = значение C
ПЛОЩАДЬ КРУГА С РАДИУСОМ значение r = значение S. Исходные данные вводить в сантиметрах. Результат округлить до целых.
1.20
С
оставить
программу для вычисления площади
сегмента S1 и площади
сектора S2, если
известны r — радиус круга,
— центральный угол
(в градусах) по формулам:
Форма вывода результатов:
ПЛОЩАДЬ СЕГМЕНТА КРУГА = значение S1
ПЛОЩАДЬ СЕКТОРА КРУГА = значение S2.
Радиус круга задан в метрах. Площади определить с точностью до 0,1 м2.
1.22 Составить программу для исследования величины поправки (S) за редуцирование расстояния (S в метрах) при переходе с эллипсоида на плоскость в проекции Гаусса. Для этого рассчитать поправку:
для
случаев :
линия располагается на осевом меридиане (y = 0 км);
линия находится на краю шестиградусной зоны (y330км).
R — радиус Земли. R6371,1 км.
y — ордината середины редуцируемого отрезка в км.
Поправку вычислить в метрах с точностью до 0,1 м.
1
.23
Составить программу для вычисления
поправки P
в площадь за переход с поверхности шара
на плоскость в проекции Гаусса:
P — площадь участка на поверхности шара (га).
R — радиус Земли. R6371,1 км.
y — ордината середины редуцируемой площади (0-300 км).
Поправку округлить до 0,01 га.
1.24 Составить программу для расчета цены деления уровня по формуле:
г
де
l1-l2
— разность отсчетов по рейке в мм;
n — число делений, на которое сместился пузырек уровня;
d — расстояние от нивелира до рейки в метрах.
Перевод мм в м в рабочей формуле учтен константой 206''.
Результат вывести с точностью до 0,01 секунды.
1.25 Дан радиус сферы (R) в метрах. Составить программу для вычисления площади полной поверхности:
и объема:
.
Результат округлить до 0,01 метра.
1.26 Известны значения хорды шарового сектора в сантиметрах (a), радиуса шара (R в см) и стрелы шарового сектора (h в см). Cоставить программу для вычисления площади полной поверхности шарового сектора:
и объема шарового сектора:
.
Результат округлить до 0,1 сантиметра.
1.27 Дан круговой прямой цилиндр. Известен радиус цилиндра R в метрах. Составить программу для вычисления площади боковой поверхности:
площади полной поверхности:
объема:
1.28 Дан усеченный круговой цилиндр. Известны: радиус основания цилиндра — R в метрах; h1 и h2 — высоты усеченного цилиндра. Написать программу для вычисления площади боковой поверхности:
площади полной поверхности:
,
объема
.
Результат округлить до 0,001 метра.
1.29 Известны: r и R — внутренний и внешний радиусы кругового кольца в метрах; центральный угол (в градусах) части кольца. Составить программу для вычисления площади кругового кольца (S1) и площади части кольца (S2) с заданным центральным углом по формулам:
,
.
Результат округлить до 0,1 метра.
1.30 Составить программу для вычисления объема трехгранной усеченной пирамиды. Если известны стороны оснований пирамиды: a1, b1, c1 a2, b2, c2, высота пирамиды h по формуле:
где F — площадь нижнего основания;
f — площадь верхнего основания.
Площади оснований рассчитать по формуле Герона.
1.31 Написать программу для вычисления расстояния S между двумя населенными пунктами, если автомобиль со скоростью V км/час проезжает его за T часов.
Расстояние S между населенными пунктами равно S = V*T.
Предусмотреть запросы при вводе исходных данных:
Скорость автомобиля км/час:
Время проезда в часах:
Форма вывода результата:
Расстояние между населенными пунктами равно <значение S> км.
1.32 Составить программу для вычисления силы тока I = q/t,
где q — величина электрического заряда (измеряется в кулонах);
t — время прохождения заряда через поперечное сечение проводника в секундах.
Результат округлить до 0,1 ампера.