Алгоритмизация и програмирование

| Категория реферата: Рефераты по информатике, программированию
| Теги реферата: скачать конспект урока, экзамен
| Добавил(а) на сайт: Akinfij.

а – угол в вершине шарового сектора, который изменяется от а1 до а2 с шагом b; r1 – радиус первого шара, из которого вырезан сектор; r2 – радиус второго шара (изменяется от r3 до r4 с шагом k); r_osn – радиус основания шарового сегмента; h – высота шарового сегмента, принадлежащего шаровому сектору; h1 – высота конуса, принадлежащего шаровому сектору; v_sek – объем шарового сектора; v_shar – объем шара.
4. Анализ результатов вычислений

Расчеты, проведенные по программе, реализующей описанный в пункте 3 алгоритм (текст программы см. в приложении), позволили получить следующие результаты.
Максимальное значение угла в вершине шарового сектора=14 рад.
Максимальное значение высоты =2,4879 см.
Радиус основания шарового сектора=2,1681 см.
Значения параметров рассматриваемых фигур: высота шарового сегмента h=0.4 м, радиус шара r4=1.2329 м, радиус шара 2 r3=0.6 м, радиус шара1 r1=2.1 м.

Анализ этих результатов дает возможность сделать вывод, что составленная программа позволяет правильно решить поставленную задачу.

Заключение

В курсовой работе решена задача определения параметров шара и шарового сектора, при которых их объёмы равны в пределах заданной точности.
Составлена и отлажена программа, реализующая указанный алгоритм. С ее помощью проведены расчеты, проанализированы полученные результаты. Анализ результатов показал, что поставленная задача успешно решена.

ЛИТЕРАТУРА

1. Выгодский М. Я. Справочник по элементарной математике / М. Я.
Выгодский. М.: Наука, 1976.
2. Вычислительная техника и программирование. Учеб. Для техн. Вузов /
А.В. Петров, В.Е. Алексеев, А.С. Ваулин и др.; Под ред.
А.В. Петрова.- М.: Высш. шк., 1990.
3. Вычислительная техника и программирование. Практикум по программированию: Практ. Пособие / В.Е. Алексеев, А.С. Ваулин,

Г.Б. Петрова ; Под ред. А.В. Петрова.- М.: Высш. шк., 1991.

ТЕКСТ ПРОГРАММЫ И РАСПЕЧАТКА С ЭВМ

Program Kursovik;
Uses Crt; label 1;
Var h1,r,v_sek,v_shar,a1,a2,k,b,r1,r_osn,r3,r4,h:real;
Begin clrscr; b:=1; k:=-0.1; a1:=1; a2:=161; r3:=3.6; r4:=0.2; r1:=3.3; repeat r_osn:=abs(r1*sin(a1/2)); h1:=abs(r1*cos(a1/2)); h:=r1-h1; v_sek:=2/3*pi*r1*r1*h; v_shar:=4/3*pi*r3*r3*r3; if v_sek>v_shar then begin a1:=a1-b; r3:=r3-k; r_osn:=abs(r1*sin(a1/2)); h1:=abs(r1*cos(a1/2)); h:=r1-h1; v_sek:=2/3*pi*r1*r1*h; v_shar:=4/3*pi*r3*r3*r3; writeln('Максимальный угол= ',a1:8:4); writeln('Максимальное значение высоты= ',h1:8:4); writeln('Максимальный радиус основания= ',r_osn:8:4); writeln('Объем шарового сектора= ',v_sek:8:4); writeln('Объем шара= ',v_shar:8:4); writeln(v_sek:8:4, ' < ',v_shar:8:4, ' -> Условие выполняется'); goto 1; end; a1:=a1+b; r3:=r3+k; until a1=161;

1:readkey;
END.

Результаты вычислений

--------------------
[pic]

МИНИСТЕРСТВО ОБРАЗОВАНИЯ РОССИЙСКОЙ ФЕДЕРАЦИИ

ПЕНЗЕНСКИЙ ГОСУДАРСТВЕННЫЙ УНИВЕРСИТЕТ

Кафедра

МО и ПЭВМ

Зав. кафедрой

(ученое звание, ученая степень)

2003 г.

(подпись, инициалы, фамилия)

АЛГОРИТМИЗАЦИЯ И ПРОГРАММИРОВАНИЕ

Пояснительная записка к курсовой работе

ПГУ 170900-02КР021.12ПЗ

(обозначение документа)