Расчёт статически определяемых стержневых систем неравного сечения на растяжение-сжатие
Курсовая работа, 25 Декабря 2010, автор: пользователь скрыл имя
Описание работы
Цель данной работы – выполнить расчет стержневой системы методами сопротивления материалов на растяжение-сжатие (рассмотреть случаи статически определяемой системы).
Для реализации поставленной цели в работе необходимо решить следующие задачи:
1.разработать сценарий работы приложения;
2.разработать макеты экранных форм;
3.разработать приложение, реализующее следующие функции:
•ввод данных;
•расчет и вывод результатов;
•построение эпюр;
•вывод справочной информации о приложении;
•возможность изменения интерфейса рабочей области.
Содержание работы
ВВЕДЕНИЕ 5
1 ПОНЯТИЕ ДОХОДЫ НАСЕЛЕНИЯ, ИХ КЛАССИФИКАЦИЯ. ВИДЫ
ДОХОДОВ 6
2 ДОХОДЫ НАСЕЛЕНИЯ. ПОКАЗАТЕЛИ ДИФФЕРЕНЦИАЦИИ ДОХОДОВ НАСЕЛЕНИЯ 8
3 АНАЛИЗ ПОКАЗАТЕЛЕЙ ДИФФЕРЕНЦИАЦИИ ДОХОДОВ. КРИВАЯ ЛОРЕНЦА 13
ЗАКЛЮЧЕНИЕ 17
БИБЛИОГРАФИЧЕСКИЙ СПИСОК 18
Файлы: 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.image2.Canvas.Draw(2,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l2.bmp');
Form1.image2.Canvas.Draw(2,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l3.bmp');
Form1.image2.Canvas.Draw(2,
end;
if (a=2) and (b=1) then begin
epi4;
Form1.Image1.Canvas.Pen.Width:
Form1.Image1.Canvas.Pen.Color:
Form1.Image1.Canvas.MoveTo(60,
Form1.Image1.Canvas.LineTo(60,
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.Pen.Width:
Form1.Image1.Canvas.Pen.Color:
Form1.Memo1.Lines.Add('');
if Form4.ComboBox1.Text='
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos4[1]/m))+' Па');
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos4[2]/m))+' Па');
end
else begin
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos4[1]/m),
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos4[2]/m),
end;
Form1.Memo1.Lines.Add('');
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(70,
Form1.Image1.Canvas.LineTo(60,
Form1.Image1.Canvas.MoveTo(20+
Form1.Image1.Canvas.LineTo(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o3.bmp');
Form1.image1.Canvas.Draw(65,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o2.bmp');
Form1.image1.Canvas.Draw(15+
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l1.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l2.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o2.bmp');
Form1.image2.Canvas.Draw(2,31,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o1.bmp');
Form1.image2.Canvas.Draw(2,44,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l1.bmp');
Form1.image2.Canvas.Draw(2,70,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l2.bmp');
Form1.image2.Canvas.Draw(2,83,
end;
if (a=2) and (b=2) then begin
epi5;
Form1.Image1.Canvas.Pen.Width:
Form1.Image1.Canvas.Pen.Color:
Form1.Image1.Canvas.MoveTo(60,
Form1.Image1.Canvas.LineTo(60,
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.Pen.Width:
Form1.Image1.Canvas.Pen.Color:
Form1.Memo1.Lines.Add('');
if Form4.ComboBox1.Text='
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos5[1]/m))+' Па');
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos5[2]/m))+' Па');
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos5[3]/m))+' Па');
end
else begin
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos5[1]/m),
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos5[2]/m),
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos5[3]/m),
end;
Form1.Memo1.Lines.Add('');
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(70,
Form1.Image1.Canvas.LineTo(60,
Form1.Image1.Canvas.MoveTo(20+
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(20+
Form1.Image1.Canvas.LineTo(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o3.bmp');
Form1.image1.Canvas.Draw(65,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o2.bmp');
Form1.image1.Canvas.Draw(15+
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o1.bmp');
Form1.image1.Canvas.Draw(15+
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l1.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l2.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l3.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o3.bmp');
Form1.image2.Canvas.Draw(2,44,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o2.bmp');
Form1.image2.Canvas.Draw(2,57,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o1.bmp');
Form1.image2.Canvas.Draw(2,70,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l1.bmp');
Form1.image2.Canvas.Draw(2,96,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l2.bmp');
Form1.image2.Canvas.Draw(2,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l3.bmp');
Form1.image2.Canvas.Draw(2,
end;
if (a=2) and (b=3) then begin
epi6;
Form1.Image1.Canvas.Pen.Width:
Form1.Image1.Canvas.Pen.Color:
Form1.Image1.Canvas.MoveTo(60,
Form1.Image1.Canvas.LineTo(60,
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.Pen.Width:
Form1.Image1.Canvas.Pen.Color:
Form1.Memo1.Lines.Add('');
if Form4.ComboBox1.Text='
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos6[1]/m))+' Па');
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos6[2]/m))+' Па');
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos6[3]/m))+' Па');
Form1.Memo1.Lines.Add('= '+Floattostr(abs(pos6[4]/m))+' Па');
end
else begin
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos6[1]/m),
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos6[2]/m),
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos6[3]/m),
Form1.Memo1.Lines.Add('= '+FloattostrF(abs(pos6[4]/m),
end;
Form1.Memo1.Lines.Add('');
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(70,
Form1.Image1.Canvas.LineTo(60,
Form1.Image1.Canvas.MoveTo(20+
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(20+
Form1.Image1.Canvas.LineTo(
Form1.Image1.Canvas.MoveTo(20+
Form1.Image1.Canvas.LineTo(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o4.bmp');
Form1.image1.Canvas.Draw(65,
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o3.bmp');
Form1.image1.Canvas.Draw(15+
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o2.bmp');
Form1.image1.Canvas.Draw(15+
Pic:=Tbitmap.Create;
Pic.LoadFromFile('o1.bmp');
Form1.image1.Canvas.Draw(15+
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l1.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l2.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l3.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;
Pic.LoadFromFile('l4.bmp');
Form1.image1.Canvas.Draw(
Pic:=Tbitmap.Create;