Программа определения момента образования трещин при изгибе в среде программирования Paskal

Определение образования трещин при изгибе в среде программирования Paskal. Деформационная модель с учетом неупругих деформаций растянутого бетона. Момент инерции сечения бетона соответственно растянутой и сжатой арматуры. Алгоритм в виде блок-схемы.

Рубрика Программирование, компьютеры и кибернетика
Вид контрольная работа
Язык русский
Дата добавления 26.01.2012
Размер файла 334,2 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Размещено на http://www.allbest.ru/

Программа определения момента образования трещин при изгибе в среде программирования Paskal

1. Постановка задачи

Написать программу определения момента образования трещин при изгибе в среде программирования Paskal.

2. Анализ предметной области

2.1 Изгибающий момент Mcrc при образовании трещин определяется на основе деформационной модели с учетом неупругих деформаций растянутого бетона

Допускается определять момент Mcrc без учета неупругих деформаций бетона согласно пп.2.2 и 2.3. Если при этом условие (Расчет по раскрытию трещин производят из условия acrc ? acrc,ult) не удовлетворяется, то момент образования трещин следует определять с учетом неупругих деформаций бетона.

2.2 Момент образования трещин без учета неупругих деформаций бетона определяют как для сплошного упругого тела по формуле

Mcrc = Rbе,serW ± Neя (1.4)

где W - момент сопротивления приведенного сечения для крайнего растянутого волокна бетона:

eя - расстояние от центра тяжести приведенного сечения элемента до ядровой точки, наиболее удаленной от растянутой зоны, трещинообразование которой проверяется.

Значения W и ея определяются согласно п.2.3. В формуле (1.4) знак "плюс" принимают при сжимающей продольной силе N, знак "минус" - при растягивающей силе.

2.3 Момент сопротивления W и расстояние ея определяют по формулам:

, (1.5)

, (1.6)

где Ired - момент инерции приведенного сечения относительно его центра тяжести, определяемый по формуле

Ired = I + Isa + I'sa; (1.7)

I , Is , I's - момент инерции сечения соответственно бетона, растянутой и сжатой арматуры;

Ared - площадь приведенного сечения, равная

Ared = A + Asa + A'sa, (1.8)

- коэффициент приведения арматуры к бетону;

yt - расстояние от наиболее растянутого волокна бетона до центра тяжести приведенного сечения элемента.

При значения W и ея допускается определять без учета арматуры.

Черт.1.1. Схема напряженно-деформированного состояния сечения элемента при проверке образования трещин при действии изгибающего момента (а), изгибающего момента и продольной силы (б)

1 -уровень центра тяжести приведенного сечения

2.4 Для прямоугольных, тавровых и двутавровых сечений при действии момента в плоскости оси симметрии момент образования трещин с учетом неупругих деформаций растянутого бетона допускается определять по формуле (1.4) с заменой значения W на Wpi= Wг, где г - см. табл.1.1

изгиб программирование модель бетон

3. Алгоритм в виде блок схемы

4. Спецификация используемых переменных

Переменная

Описание

Тип

ОЗУ

Mcrc

Изгибающий момент

Real

6 байта

acrc

Ширина раскрытия трещин от действия внешней нагрузки

Real

6 байта

acrc,ult

Предельно допустимая ширина раскрытия трещин

Real

6 байта

W

Момент сопротивления приведенного

Real

6 байтов

N

Растягивающее усилие

Integer

2 байта

eя

Расстояние от центра тяжести приведенного сечения элемента до ядровой точки

Real

6 байтов

Ired

Момент инерции приведенного сечения относительно его центра тяжести

Integer

2 байта

I , Is , I's

Момент инерции сечения соответственно бетона, растянутой и сжатой арматуры

Real

6 байтов

Ared

Площадь приведенного сечения, равная

Real

6 байтов

Коэффициент приведения арматуры к бетону

Real

6 байтов

yt

Расстояние от наиболее растянутого волокна бетона до центра тяжести приведенного сечения элемента

Integer

2 байта

F

Подданая сила

Integer

2 байта

Wpi

Постоянная

Integer

2 байта

5. Описание интерфейса

Задача достаточно линейна. Все действия выполняются последовательно. Расчет в первую очередь будет зависеть от входной сжимающей или растягивающей силы, от определения входных переменных. Также в зависимости от входных параметров момент будет рассчитан либо с учетом, либо без арматуры, с учетом либо без не упругих деформаций.

Заключение

В заключении хотелось бы отметить, что в ходе проделанной работы были получены начальные навыки программирования в среде Pascal. Получены навыки составления блок - схем в программе MS VISIO 2010. Также были расширены знания по предмету расчета деформаций каменных и армокаменных конструкций. Были изучены главы СНИП, схожие по тематике с задачей курсовой работы. Была написана программа определения момента образования трещин при изгибе, возникающих в бетоне.

Список используемых источников

1. Пособие по проектированию бетонных и железобетонных конструкций из тяжелого бетона без предварительного напряжения

арматуры (к сп 52-101-2003) Москва 2005

2. СНиП 52-01-2003 «Бетонные и железобетонные конструкции» -- Введен с 1 января 2003 года

3. Turbo Pascal. Учебник Немнюгин С. А.

4. Конспекты лекций по предмету» Информатика»

Приложение 1

Исходный код программы с комментариями

program work;

var //описание переменных

W, M, er, acrc, acrc_ult, _a, Rbe_ser : real;

yt, Es, Eb, Ired, Ared, As, A, I, Asa, A1sa, Isa, I1sa, Wpi, F, N: integer;

begin

//ввод исходных данных

writeln('As, A, I, Es, Eb, Asa, A1sa, Isa, I1sa, acrc, acrc_ult, Wpi, yt, F(1,2), Rbe_ser, N');

readln(As, A, I, Es, Eb, Asa, A1sa, Isa, I1sa, acrc, acrc_ult, Wpi, yt, F, Rbe_ser, N);

//без учета арматуры

if (As/A < 0.005) then

begin

Ired := I;

Ared := A;

end

else

begin // с учетом

_a := Es/Eb;

Ared := A + Asa + A1sa;

Ired := I + Isa + I1sa;

end;

if (acrc <= acrc_ult) then//без учета неупругих деформаций

W := Ired/yt

else

W := Wpi; //с учетом упругих дефформаций

er := W/Ared;

if (F = 1) then

M := Rbe_ser*W+N*er//относительно сжимающей силы

else

M := Rbe_ser*W-N*er; //относительно растягивающей силы

writeln('Rezultat - ', M:1:5);// выводим данные на экран

readln;

end.

Приложение 2

Техническое задание

1) Основание для разработки.

Настоящая разработка ведется на основании курсовой работы по предмету «Информатика».

Наименование курсовой работы: «Определение момента образования трещин при изгибе».

2) Назначение разработки.

Данная программа применяется для расчета момента образования трещин при изгибе.

3) Требования к программе.

3.1 Общие требования к разработке:

- Программа должна быть реализована в среде программирования Paskal.

3.2. Требования к функциональным характеристикам:

- Обеспечить ввод начальных параметров;

- Обеспечить точный расчет момент.

3.3. Требования к надежности.

Надежность обеспечивается следующими средствами:

- контроль входных и выходных данных;

- не зависание

- правильное и своевременное оповещение об ошибках.

3.4 Требования к составу и параметрам технических средств:

- Процессор с тактовой чистотой 600МГц;

- Оперативная память 256 kb;

- Монитор с разрешением 1024 x 768;

- Клавиатура;

3.5 Требования к информационной программной совместимости:

- OS MS Windows 98 и выше или Dos;

3.6. Специальные требования.

нет

3.7 Требования к документации

3.7.1 Пояснительная записка

- Введение;

- Анализ предметной области;

- Выбор среды разработки;

- Описание программного комплекса;

- Заключение

- Список использованных источников

Приложение 1. Исходный код

Приложение 2. Техническое задание

Приложение 3. Таблицы и справочные материалы

Приложение 3

Таблица 1.1 - Коэффициенты сечений

Сечение

Коэффициент г

Форма поперечного сечения

1. Прямоугольное

1,30

2.Тавровое с полкой, расположенной в сжатой зоне

1,30

3. Тавровое с полкой (уширением), расположенной в растянутой зоне:

а) при bf /b ? 2 независимо от отношения hf /h

1,25

б) при bf /b > 2 и hf /h ? 0,2

1,25

в) при bf /b > 2 и hf /h < 0,2

1,20

4.Двутавровое симметричное (коробчатое):

а) при b'f /b = bf /b ? 2 независимо от отношения h'f /h = hf /h

1,30

б) при 2 < b'f /b = bf /b ? 6 независимо от отношения h'f /h = hf /h

1,25

в) при b'f /b = bf /b > 6 и h'f /h = hf /h ? 0,2

1,25

г) при 6< b'f /b = bf /b ? 15 и h'f /h = hf /h < 0,2

1,20

д) при b'f /b = bf /b ? 15 и h'f /h = hf /h < 0,2

1,15

5.Двутавровое несимметричное, удовлетворяющее условию b'f /b ? 3:

а) при bf /b < 2 независимо от отношения hf /h

1,30

б) при 2 < bf /b ? 6 независимо от отношения hf /h

1,25

в) при bf /b > 6 и hf /h > 0,1

1,25

6.Двутавровое несимметричное,

удовлетворяющее условие 3 < b'f /b < 8:

а) при bf /b ? 4 независимо от отношения hf /h

1,25

б) при bf /b > 4 и hf /h ? 0,2

1,25

в) при bf /b > 4 и hf /h < 0,2

1,20

7. Двутавровое несимметричное, удовлетворяющие условию b'f /b ? 8:

а) при hf /h > 0,3

б) при hf /h ? 0,3

Размещено на Allbest.ru


Подобные документы

  • Перевод числа из десятичной системы счисления в двоичную. Результат выполнения в TURBO PASKAL заданных функций и операций. Программа вычисления значений функции на языке PASKAL, блок-схема. Вычисление суммы и произведения всех элементов массива.

    контрольная работа [66,6 K], добавлен 15.02.2013

  • Характеристика программирования с точки зрения процесса создания программы. Спецификация и определение требований к программе. Основные символы, используемые для представления алгоритма в виде блок-схемы. Особенности процесса поиска и устранения ошибок.

    лекция [234,9 K], добавлен 07.04.2011

  • Принцип работы основных операторов языка программирования Turbo-Paskal: оператор присваивания, выбора Case, безусловного перехода, цикла, уловный, составной. Формальное описание и вызов функции и процедуры. Требования к списку фактических параметров.

    реферат [261,8 K], добавлен 09.02.2011

  • Ознакомление со структурой языка программирования Turbo-Pascal 7.0, его алфавитом, выражениями и простейшими конструкциями (метками, идентификаторами). Способы описания арифметических, вещественных, логических и символьных операций в программной среде.

    реферат [68,2 K], добавлен 07.02.2011

  • Создание программы в среде программирования MatLab для решения задачи одномерной оптимизации (нахождение минимума и максимума заданных функций) методом золотого сечения, построение блок-схемы алгоритма и графическое изображение исследованных функций.

    реферат [112,0 K], добавлен 14.06.2010

  • Программа построения двумерного и трехмерного изображения детали. Обоснование выбора средства параметрического моделирования. Графическая система Компас-3D, язык программирования AutoLisp в среде AutoCAD. Определение базовых размеров и контрольных точек.

    курсовая работа [1,5 M], добавлен 20.08.2009

  • Разработана программа решения двух задач на языке программирования Turbo Pascal. Спецификация задания. Описание входных и выходных данных. Математическая постановка задачи. Алгоритм ее решения. Описание и блок-схема программы. Результаты тестирования.

    курсовая работа [275,8 K], добавлен 28.06.2008

  • Создание рабочего модуля аналого-цифрового преобразователя с минимальным количеством микросхем на основе микроконтроллера ATmega8L. Описание блок-схемы АЦП. Схема запуска преобразования. Программа микроконтроллера в среде программирования CodeVision.

    курсовая работа [1,2 M], добавлен 04.10.2013

  • Алгоритм и блок-схема процесса обработки в диалоговой программе, вычисляющей площадь треугольника. Описание объектов, свойств, методов программы в среде визуального программирования С++ Builder. Формы и основные модули текста разработанной программы.

    курсовая работа [2,2 M], добавлен 01.06.2014

  • Методика и технологический прием структурного программирования; построение алгоритма программы логической задачи в виде блок-схемы из структур "следование, ветвление, цикл"; кодирование текста программы, языки структурного программирования Паскаль и Си.

    реферат [623,5 K], добавлен 25.03.2012

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.