Расчёт статически определяемых стержневых систем неравного сечения на растяжение-сжатие

Автор работы: Пользователь скрыл имя, 25 Декабря 2010 в 09:54, курсовая работа

Описание работы

Цель данной работы – выполнить расчет стержневой системы методами сопротивления материалов на растяжение-сжатие (рассмотреть случаи статически определяемой системы).

Для реализации поставленной цели в работе необходимо решить следующие задачи:

1.разработать сценарий работы приложения;
2.разработать макеты экранных форм;
3.разработать приложение, реализующее следующие функции:


•ввод данных;
•расчет и вывод результатов;
•построение эпюр;
•вывод справочной информации о приложении;
•возможность изменения интерфейса рабочей области.

Содержание работы

ВВЕДЕНИЕ 5
1 ПОНЯТИЕ ДОХОДЫ НАСЕЛЕНИЯ, ИХ КЛАССИФИКАЦИЯ. ВИДЫ
ДОХОДОВ 6
2 ДОХОДЫ НАСЕЛЕНИЯ. ПОКАЗАТЕЛИ ДИФФЕРЕНЦИАЦИИ ДОХОДОВ НАСЕЛЕНИЯ 8
3 АНАЛИЗ ПОКАЗАТЕЛЕЙ ДИФФЕРЕНЦИАЦИИ ДОХОДОВ. КРИВАЯ ЛОРЕНЦА 13
ЗАКЛЮЧЕНИЕ 17
БИБЛИОГРАФИЧЕСКИЙ СПИСОК 18

Скачать архив (437.95 Кб) Сколько стоит заказать работу?
Файлы: 15 файлов

1 Выбор языка программирования.doc

— 82.00 Кб (Просмотреть файл, Скачать файл)

2 анализ и уточнение требований к ПП.doc

— 77.50 Кб (Просмотреть файл, Скачать файл)

3 разработка основных методов и алгоритмов программного продукта.doc

— 72.00 Кб (Просмотреть файл, Скачать файл)

4.doc

— 94.00 Кб (Просмотреть файл, Скачать файл)

5 разработка Ф c.doc

— 89.00 Кб (Просмотреть файл, Скачать файл)

6 Проектирование интерфейса пользователя.doc

— 124.50 Кб (Просмотреть файл, Скачать файл)

6 Проектирование интерфейса пользователя в2.doc

— 132.50 Кб (Просмотреть файл, Скачать файл)

7 разработка тестов.doc

— 152.50 Кб (Просмотреть файл, Скачать файл)

Библиографический список+.doc

— 57.50 Кб (Просмотреть файл, Скачать файл)

введение.doc

— 70.00 Кб (Просмотреть файл, Скачать файл)

заключение.doc

— 65.50 Кб (Просмотреть файл, Скачать файл)

ПРИЛОЖЕНЕ A.doc

— 267.50 Кб (Скачать файл)

            Form1.Memo1.Clear;

            image1.Canvas.Brush.Color:=clWhite;

            image1.Canvas.Brush.Style:=bsSolid;

            image1.Canvas.Rectangle(0,0,630,667);

            Pic:=Tbitmap.Create;

            Pic.LoadFromFile('Fon.bmp');

            Form1.image1.Canvas.Draw(60,105,Pic);

            image1.Canvas.Brush.Color:=clBackground;

            image1.Canvas.Brush.Style:=bsFDiagonal;

            Form1.Image1.Canvas.Pen.Width:=2;

            image1.Canvas.MoveTo(59,190);

            image1.Canvas.LineTo(round(d12+58),190);

            image1.Canvas.MoveTo(59,580);

            image1.Canvas.LineTo(round(d12+58),580);

            image1.Canvas.MoveTo(59,380);

            image1.Canvas.LineTo(round(d12+58),380);

            image1.Canvas.Rectangle(35,5,60,105);

            image1.Canvas.Brush.Color:=clWindow;

            image1.Canvas.Brush.Style:=bsClear;

            image1.Canvas.Rectangle(59,30,round(d12+59),80);

            Form1.Image1.Canvas.Pen.Width:=1;

            Form1.Image1.Canvas.Pen.Style:=psDashDot;

            image1.Canvas.MoveTo(59,5);

            image1.Canvas.LineTo(59,667);

            image1.Canvas.MoveTo(round(d12+58),30);

            image1.Canvas.LineTo(round(d12+58),667);

            Form1.Image1.Canvas.Pen.Style:=psSolid;

            end;

if a=2 then begin

            ed2;

            image2.Canvas.Brush.Color:=clWhite;

            image2.Canvas.Brush.Style:=bsSolid;

            image2.Canvas.Rectangle(0,0,600,667);

            Form1.Memo1.Clear;

            image1.Canvas.Brush.Color:=clWhite;

            image1.Canvas.Brush.Style:=bsSolid;

            image1.Canvas.Rectangle(0,0,630,667);

            Pic:=Tbitmap.Create;

            Pic.LoadFromFile('Fon.bmp');

            Form1.image1.Canvas.Draw(60,105,Pic);

            image1.Canvas.Brush.Color:=clBackground;

            image1.Canvas.Brush.Style:=bsFDiagonal;

            Form1.Image1.Canvas.Pen.Width:=2;

            image1.Canvas.MoveTo(60,190);

            image1.Canvas.LineTo(round(d22+58),190);

            image1.Canvas.MoveTo(60,580);

            image1.Canvas.LineTo(round(d22+58),580);

            image1.Canvas.MoveTo(60,380);

            image1.Canvas.LineTo(round(d22+58),380);

            image1.Canvas.Rectangle(35,5,60,105);

            image1.Canvas.Brush.Color:=clWindow;

            image1.Canvas.Brush.Style:=bsClear;

            image1.Canvas.Rectangle(59,round(r11),round(d12+60),round(r12));

            image1.Canvas.Rectangle(round(d12+59),round(r21),round(d22+59),round(r22));

            Form1.Image1.Canvas.Pen.Width:=1;

            Form1.Image1.Canvas.Pen.Style:=psDashDot;

            image1.Canvas.MoveTo(59,5);

            image1.Canvas.LineTo(59,667);

            image1.Canvas.MoveTo(round(d12+58),55);

            image1.Canvas.LineTo(round(d12+58),667);

            image1.Canvas.MoveTo(round(d22+58),55);

            image1.Canvas.LineTo(round(d22+58),667);

            Form1.Image1.Canvas.Pen.Style:=psSolid;

            end;

if a=3 then begin

            ed3;

            image2.Canvas.Brush.Color:=clWhite;

            image2.Canvas.Brush.Style:=bsSolid;

            image2.Canvas.Rectangle(0,0,600,667);

            Form1.Memo1.Clear;

            image1.Canvas.Brush.Color:=clWhite;

            image1.Canvas.Brush.Style:=bsSolid;

            image1.Canvas.Rectangle(0,0,630,667);

            Pic:=Tbitmap.Create;

            Pic.LoadFromFile('Fon.bmp');

            Form1.image1.Canvas.Draw(60,105,Pic);

            image1.Canvas.Brush.Color:=clBackground;

            image1.Canvas.Brush.Style:=bsFDiagonal;

            Form1.Image1.Canvas.Pen.Width:=2;

            image1.Canvas.MoveTo(59,190);

            image1.Canvas.LineTo(round(d32+58),190);

            image1.Canvas.MoveTo(59,380);

            image1.Canvas.LineTo(round(d32+58),380);

            image1.Canvas.MoveTo(59,580);

            image1.Canvas.LineTo(round(d32+58),580);

            image1.Canvas.Rectangle(35,5,60,105);

            image1.Canvas.Brush.Color:=clWindow;

            image1.Canvas.Brush.Style:=bsClear;

            image1.Canvas.Rectangle(59,round(r11),round(d12+59),round(r12));

            image1.Canvas.Rectangle(round(d12+58),round(r21),round(d22+59),round(r22));

            image1.Canvas.Rectangle(round(d22+58),round(r31),round(d32+59),round(r32));

            Form1.Image1.Canvas.Pen.Width:=1;

            Form1.Image1.Canvas.Pen.Style:=psDashDot;

            image1.Canvas.MoveTo(59,5);

            image1.Canvas.LineTo(59,667);

            image1.Canvas.MoveTo(round(d32+58),55);

            image1.Canvas.LineTo(round(d32+58),667);

            image1.Canvas.MoveTo(round(d12+58),55);

            image1.Canvas.LineTo(round(d12+58),667);

            image1.Canvas.MoveTo(round(d22+58),55);

            image1.Canvas.LineTo(round(d22+58),667);

            Form1.Image1.Canvas.Pen.Style:=psSolid;

            end; 

Form1.Image1.Canvas.Pen.Style:=psDashDot;

image1.Canvas.MoveTo(20,54);

image1.Canvas.LineTo(585,54);

Form1.Image1.Canvas.Pen.Style:=psSolid; 

if s1=1 then begin

            Pic:=Tbitmap.Create;

            Pic.LoadFromFile('str2.bmp');

            Form1.image1.Canvas.Draw(4,50,Pic);

            end

            else

            begin

            Pic:=Tbitmap.Create;

            Pic.LoadFromFile('str1.bmp');

            Form1.image1.Canvas.Draw(4,50,Pic);

            end; 

if b=1 then begin

            si1;

            if s1=1 then begin

                         image1.Canvas.MoveTo(round(58+p1),20);

                         image1.Canvas.LineTo(round(118+p1),20);

                         image1.Canvas.MoveTo(round(118+p1),20);

                         image1.Canvas.LineTo(round(113+p1),16);

                         image1.Canvas.MoveTo(round(118+p1),20);

                         image1.Canvas.LineTo(round(113+p1),24);

                         image1.Canvas.MoveTo(round(58+p1),20);

                         Form1.Image1.Canvas.Pen.Style:=psDashDot;

                         image1.Canvas.LineTo(round(58+p1),760);

                         Form1.Image1.Canvas.Pen.Style:=psSolid;

                         image1.Canvas.Rectangle(round(57+p1),19,round(60+p1),22);

                         Pic:=Tbitmap.Create;

                         Pic.LoadFromFile('F1.bmp');

                         Form1.image1.Canvas.Draw(round(48+p1),17,Pic);

                         end

                   else begin

                         image1.Canvas.MoveTo(round(58+p1),20);

                         image1.Canvas.LineTo(round(p1-10),20);

                         image1.Canvas.MoveTo(round(p1-10),20);

                         image1.Canvas.LineTo(round(p1-5),16);

                         image1.Canvas.MoveTo(round(p1-10),20);

                         image1.Canvas.LineTo(round(p1-5),24);

                         image1.Canvas.MoveTo(round(58+p1),20);

                         Form1.Image1.Canvas.Pen.Style:=psDashDot;

                         image1.Canvas.LineTo(round(58+p1),760);

                         Form1.Image1.Canvas.Pen.Style:=psSolid;

                         image1.Canvas.Rectangle(round(57+p1),19,round(60+p1),22);

                         Pic:=Tbitmap.Create;

                         Pic.LoadFromFile('F1.bmp');

                         Form1.image1.Canvas.Draw(round(62+p1),17,Pic);

                         end; 

            end; 

if b=2 then begin

            si2;

            if s1=1 then begin

                         image1.Canvas.MoveTo(round(58+p1),11);

                         image1.Canvas.LineTo(round(58+p1+z1),11);

                         image1.Canvas.MoveTo(round(58+p1+z1),11);

                         image1.Canvas.LineTo(round(53+p1+z1),7);

                         image1.Canvas.MoveTo(round(58+p1+z1),11);

                         image1.Canvas.LineTo(round(53+p1+z1),15);

                         image1.Canvas.MoveTo(round(58+p1),11);

                         Form1.Image1.Canvas.Pen.Style:=psDashDot;

                         image1.Canvas.LineTo(round(58+p1),760);

                         Form1.Image1.Canvas.Pen.Style:=psSolid;

                         image1.Canvas.Rectangle(round(57+p1),10,round(60+p1),13);

                         Pic:=Tbitmap.Create;

                         Pic.LoadFromFile('F1.bmp');

                         Form1.image1.Canvas.Draw(round(48+p1),8,Pic);

                         end

                    else begin

                         image1.Canvas.MoveTo(round(58+p1),11);

                         image1.Canvas.LineTo(round(p1-z1+58),11);

                         image1.Canvas.MoveTo(round(p1-z1+58),11);

                         image1.Canvas.LineTo(round(p1-z1+64),7);

                         image1.Canvas.MoveTo(round(p1-z1+58),11);

                         image1.Canvas.LineTo(round(p1-z1+64),15);

                         image1.Canvas.MoveTo(round(58+p1),11);

                         Form1.Image1.Canvas.Pen.Style:=psDashDot;

                         image1.Canvas.LineTo(round(58+p1),760);

                         Form1.Image1.Canvas.Pen.Style:=psSolid;

                         image1.Canvas.Rectangle(round(57+p1),10,round(60+p1),13);

                         Pic:=Tbitmap.Create;

                         Pic.LoadFromFile('F1.bmp');

                         Form1.image1.Canvas.Draw(round(62+p1),8,Pic);

                         end;

            if s2=1 then begin

                         image1.Canvas.MoveTo(round(58+p2),22);

                         image1.Canvas.LineTo(round(58+p2+z2),22);

                         image1.Canvas.MoveTo(round(58+p2+z2),22);

                         image1.Canvas.LineTo(round(53+p2+z2),18);

                         image1.Canvas.MoveTo(round(58+p2+z2),22);

                         image1.Canvas.LineTo(round(53+p2+z2),26);

ПРИЛОЖЕНЕ Б.doc

— 137.50 Кб (Просмотреть файл, Скачать файл)

содержание.doc

— 158.50 Кб (Просмотреть файл, Скачать файл)

Титульник.doc

— 130.00 Кб (Просмотреть файл, Скачать файл)

Информация о работе Расчёт статически определяемых стержневых систем неравного сечения на растяжение-сжатие