Приложения технологии языка программирования Паскаль в прикладной механике

Логические конструкции в системе программирования Паскаль. Команды языка программирования, использование функций, процедур. Постановка и решение задач механики в среде системы Паскаль. Задачи статики, кинематики, динамики решаемые с помощью языка Паскаль.

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

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

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

8. Решив систему уравнений равновесия, определить искомые величины.

Таким образом, мы пришли к результату, выраженному формулой (2). Сопоставляя оба решения, мы видим, что в первом случае мы применили общий метод составления уравнений равновесия для твердого тела, находящегося под действием произвольной плоской системы сил, не учитывая особенностей данной задачи. Достоинство общих методов и заключается в том, что они ведут к цели, несмотря на различия в условиях задач.

Иногда такой путь не является самым простым и коротким. На примере второго способа решения мы видим, что при учете особенностей данной задачи удалось составить меньшее число уравнений равновесия, которые проще и скорее привели к цели.

На основе разработанного алгоритма решения задачи по статике составим Паскаль-программу.

Program Statika;

Var

x, y, a, Pmin, Pmax:Real;

R:Integer;

Begin

Writeln('vvedite ves sterchnya');

Readln(dv);

Writeln('vvedite dliny sterchnya');

Rreadln(dl);

Writeln('vvedite ugol');

Readln(?); {?=60}

Pmin:=(R*(((cos(?)*3.14/180)/cos(?)*3.14/180)+y)); {minimalnaya velichina gruza}

Pmax:=(R*(((cos(a)*3.14/180)/cos(?)*3.14/180)-y)); {maximalnaya velichina gruza}

{pri cos(?)<y sila xmax ne suschestvuet}

Begin

If xmax<0 then x:=xmin+xmax;

If xmax>0 then x:=Pmin-xmax;

End;

Writeln('xmin=',xmin:8:6);

Writeln('xmax=',xmax:8:6);

Writeln('x=',x:8:6);

Readln;

End.

2.2. ЗАДАЧИ КИНЕМАТИКИ, РЕШАЕМЫЕ ПОСРЕДСТВОМ ЯЗЫКА ПАСКАЛЬ

Скорости точек плоской фигуры могут быть определены аналитическими , графическими или же графоаналитическими методами.

Аналитический метод. При аналитическом методе должны быть заданы уравнения движения плоской фигуры (рис.2)

Хo1=f 1(t) , 1 =f 2(t) , ? = f3 (t). (1*)

Проекции скорости точки М на неподвижные оси координат определяется равенствами:

Vx=Vо1Х-W z(Y-Yo1) (2*)

Vy=Vо1Y + Wz (Х-Хo1) (3*)

В этих формулах Vx , Vy - искомые проекции скорости точки М на неподвижные оси координат; 1x = Хo1 , Vо1y = Yo1-проекции скорости полюса, начала подвижной системы координат ХY на неподвижные оси координат ; Wz =? -проекция угловой скорости на ось Z , перпендикулярную к плоскости движения ;ХУ координаты точки М в неподвижной системе координат ; Хо1 ,Yо1 - координаты полюса О1 в неподвижной системе осей. Определение координат Х ,Y точки М , по заданным уравнениям движения плоской фигуры (1*) производится по формулам:

Х=Хо11 cos? - Y1sin ?

Y= Yо1+ Х1 sin ? +Y1 cos ?

Проекции скорости точки М на неподвижные оси координат находятся по формулам:

Vx1 =Vo1 x cos ? + Vo1 у sin ? - Wzy1 (4*)

1= -Vo1 x sin ? + Vo1 у сos ? - Wz х1 (5*)

В этих формулах Vx , Vу- искомые проекции скорости точки М на оси х, у подвижной системы координат , жестко связанной с плоской фигурой ; х у - координаты точки М в подвижной системе осей , остальные величины имеют то же значение , что и в уравнениях (2*) , (3*).

Величины скорости точки М по известным проекциям определяются формулой:

V= vVx 2+ Vу2 =v Vx12 + Vу12 (6*)

Направляющие косинусы даются равенствами:

cos (V,X)= Vx/V , cos (V,У)= Vy/V (7*)

cos (V,X)= Vx/V , cos (V,У)= Vy/V (8*)

Графоаналитические методы. Первый графоаналитический способ определения скоростей точек плоской фигуры основан на формуле распределения скоростей (рис.2).

Рис. 2. Геометрическая модель плоской фигуры

V=Vo1+W r , (9*)

в этой формуле

V - искомая скорости точки М;

Vo1 - скорость полюса О,

W - угловая скорость плоской фигуры;

r - радиус-вектор , проведенный из полюса О в Рис. 3 точку М.

Таким образом, зная скорость какой-либо точки плоской фигуры, выбираем эту точку за полюс. Далее откладываем от точки М, скорость которой подлежит определению, вектор, равный скорости полюса, и вектор W r1, направлен перпендикулярно к r1, и равный по величине W r1.Векторная сумма этих слагаемых и дает искомую скорость точки М, Если скорость точки М известна по направлению, то можно не знать величины вращательной скорости W r1, так как и эта скорость, и искомая скорость точки М определяется пересечением прямой, совпадающей с направлением скорости точки М, и прямой, перпендикулярной к линии О М, проведенной из конца вектора , отложенного из точки М.

После того, как треугольник или параллелограмм скоростей выражающий равенство (9*), построен, задача может считаться решенной. Величина и направление скорости точки М могут быть найдены по рис.(2) или получены из решения этого треугольника.

Формула распределения скоростей (9*)записывается часто в виде:

Vb=Va+Vba (9**)

где V-искомая скорость точки В, Va-известная скорость точки А , избранной за полюс, а

Vba= W АВ, Vba = W AB, (9***)

- вращательная скорость точки В вокруг точки А, равная по модулю, произведению мгновенной угловой скорости плоской фигуры на расстояние от точки до полюса и направленная перпендикулярно к отрезку прямой ВА в сторону мгновенного вращения фигуры.

Многие задачи могут быть решены при помощи теоремы о равенстве проекции скоростей концов отрезка плоской фигуры на направление отрезка.

Второй графоаналитический метод определения скоростей плоской фигуры основан на использовании мгновенного центра скоростей этой фигуры. При не поступательном движении плоской фигуры (W=0) в каждый данный момент существует точка тела , скорость которой равна нулю. Эта точка называется мгновенным центром скоростей и обычно обозначается через P. Единственным исключением является случай так называемого мгновенно поступательного движения (W=0), который будет рассмотрен отдельно. Выбирая мгновенный центр за полюс, имеем закон распределения скоростей в плоской фигуре.

V=W r 1, V=W М Р , (10*)

где V-искомая, скорость произвольной точки М; W-угловая скорость плоской фигуры, r1-радиус-вектор, проведенный из мгновенного центра скоростей в точку М, называемый мгновенным радиусом. Таким образом, скорости всех точек плоской фигуры являются в данный момент вращательными скоростями вокруг мгновенного центра скоростей. Их величина равна произведению величин угловой скорости на модуль мгновенного радиуса, а направлены они перпендикулярно к мгновенному радиусу. Таким образом, величина скоростей точки плоской фигуры пропорциональны величине мгновенных радиусов:

Vb / ВР=Va / АР=...=W, (11*)

При графоаналитических методах решения задач рекомендуется такая последовательность действий:

1) Выбрать за полюс ту точку плоской фигуры, направление скорости которой известно;

2) найти другую точку плоской фигуры, направление скорости которой известно;

1) пользуясь формулой распределения скоростей, найти скорость этой точки плоской фигуры;

2) исходя из формулы распределения скоростей определить значение угловой скорости плоской фигуры в данный момент времени;

3) зная угловую скорость фигуры и скорость полюса, найти с помощью формулы распределения скоростей искомые скорости других точек фигуры.

При графоаналитическом методе решения задач может быть применен метод проекции. В этом случае может быть рекомендован следующий порядок решения задач:

1. Выбрать за полюс точку плоской фигуры, скорость которой известна;

2. Пользуясь формулой распределения скоростей, построить скорость другой точки плоской фигуры, у которой известно направление ее скорости;

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

4. Спроектировать треугольник скоростей на направление, перпендикулярное к прямой, соединяющей обе точки, и найти вращательную скорость второй точки по отношению к полюсу;

5. Разделив вращательную скорость на расстояние от точки до полюса, найти мгновенную угловую скорость плоской фигуры;

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

Если задача решается при помощи мгновенного центра скоростей, рекомендуется такая последовательность:

1) определить положение мгновенного центра плоской фигуры;

2) найти величину мгновенного радиуса той точки плоской фигуры, скорость которой известна и определить угловую скорость плоской фигуры, разделив величину скорости точки на величину мгновенного радиуса;

3) найти искомые величины скоростей точек плоской фигуры, умножая угловую скорость на мгновенный радиус соответствующей точки или используя.

Теперь рассмотрим конкретную задачу по кинематике.

Задача. Для преобразования периодического возвратно-поступательного движения во вращательное движение в двигателях внутреннего сгорания применяют шатунно-кривошипный механизм, состоящий из кривошипа ОА=r, вращающегося вокруг неподвижной точки О в плоскости рисунка, шатуна АВ=l, шарнирно соединенного с кривошипом, и поршня В, двигающегося по горизонтальным направляющим цилиндра, совпадающим с прямой ОВ.

Рис. 3. Геометрическая модель плоского шатунно-кривошипного механизма

На основе разработанного алгоритма решения задачи по кинематике составим Паскаль - программу.

Program Kinematika;

Var t,f0,k,b1,b2,x1,x2,a,b,l,d,f1,f2,a1,a2,w1,w:real;

Begin

Write('vvedite welichini a b d l w t = ');

Readln(a,b,d,l,w,t);

x1:=(sqr(d+b)-a*a+l*l)/(2*l*(d+b));

f1:=(180/pi)*arctan(sqrt(1-sqr(x1))/x1);

x2:=(sqr(d+b)-a*a-l*l)/(2*l*a);

a1:=(180/pi)*arctan(sqrt(1-sqr(x2))/x2);

x1:=-(l*l+sqr(d-b)-a*a)/(2*l*(d-b));

f2:=(180/pi)*arctan(sqrt(1-sqr(x1))/x1);

x2:=(l*l-sqr(d-b)+a*a)/(2*l*a);

a2:=(180/pi)*arctan(sqrt(1-sqr(x2))/x2);

f0:=w*t;

k:=sqrt(l*l+b*b-2*l*b*cos(f0));

x1:=(k*k+d*d-a*a)/(2*k*d);

b2:=arctan(sqrt(1-sqr(x1))/x1);

x2:=(1/k)*sin(f0);

b1:=arctan(x2/sqrt(1-sqr(x2)));

w1:=(b*k*sin(b1+b2)*w)/(a*a*sin(b2));

Writeln('a1= ', a1:6:3,' a2= ',a2:6:3);

Writeln('f1= ', f1:6:3,' f2= ',f2:6:3);

Writeln('w1= ',w1:6:3);

Readln;

End.

2.3. ЗАДАЧИ ДИНАМИКИ, РЕШАЕМЫЕ В СРЕДЕ СИСТЕМЫ ПАСКАЛЬ

Теорема о движении центра масс системы материальных точек.

В случае сохранения скорости центра масс. Теорема о движении центра масс системы материальных точек. Зависимость между скоростью центра масс и скоростями точек материальной системы имеет вид:

Vс=(?mk *Vk)/M, т.е.

xc=(?mk*xk)/M, yc=(?mk*yk)/M, zc=(?mk*zk)/M (1*)

Здесь

Vс=xc*i+yc*j+zc*k

Зависимость между ускорением центра масс и с ускорениями точек материальной системы выражается соотношением

Wс=(?mk*Wk)/M, т.е.

xc=(?mk*xk)/M, yc=(?mk*yk)/M, zc=(?mk*zk)/M, (2*)

Здесь

Wс=xc*i+yc*j+zc*k

Напомним формулировку теоремы о движении центра масс: центр масс системы материальных точек движется как материальная точка, масса которой равна массе материальной системы и к которой приложены все внешние силы, действующие на систему: M*Wc=?Fk.

Та же теорема, записанная в проекциях на оси декартовых координат имеет вид:

Mxc=?Fkx, Myc=?Fky, Mzc=?Fkz, (3*)

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

Задачи динамики поступательного движения твердого тела решаются посредством теоремы о движении центра масс системы материальных точек.

Действительно, применив эту теорему, мы определим уравнение траектории, скорость и ускорение центра тяжести твердого тела. При поступательном движении твердого тела траектории всех точек одинаковы, а скорости и ускорения их соответственно равны.

С помощью теоремы о движении центра масс можно решать прямые и обратные задачи динамики. Последовательность решения задач:

1. Изобразить на рисунке все внешние силы системы;

2. Выбрать систему осей координат;

3. Записать теорему о движении центра масс (3*) в проекциях на декартовы оси координат;

4. Вычислить суммы проекций всех внешних сил системы на оси декартовых координат и подставить их в (3*);

5. В зависимости от условия решать прямую, либо обратную задачи динамики.

В некоторых прямых задачах бывают заданы все внешние силы, корме одной, массы всех материальных точек системы и законы их движения. Тогда после выполнения первых четырех пунктов для вычисления левых частей уравнения (3*) надо воспользоваться вспомогательными формулами

Mxc=?mkxk, Myc=?mkyk, Mzc=?mkzk (4*)

где mk - масса k-ой точки, а xk, yk, zk - уравнения ее движения, ввести эти результаты в (3*) и определить неизвестную силу.

В некоторых обратных задачах бывают заданы все внешние силы, массы всех точек системы и законы движения всех точек, кроме одной и требуется определить движение этой точки. Тогда, после выполнения первых четырех пунктов также следует воспользоваться формулами (4*), полученные результаты ввести в левые части уравнений (3*) и затем найти искомый закон движения точки.

Если в состав системы входят тела с непрерывным распределением масс, то следует записать координаты xk, yk, zk центров тяжести этих тел и затем воспользоваться формулами (4*).

Задача. Эпициклический механизм, расположенный в вертикальной плоскости, установлен на горизонтальной идеально гладкой плоскости и прикреплен к ней болтами K и L. Зубчатое колесо 1 радиуса r1 неподвижно. С2 - центр тяжести зубчатого колеса 2 весом Р2 и радиусом r2. С1 - центр тяжести станины А и колеса 1, общий вес которых равен Р1. Массой кривошипа С1С2, вращающегося с постоянной угловой скоростью w, пренебречь. В начальный момент кривошип занимал правое горизонтальное положение. Определить:

1) нормальное давление механизма на плоскость,

2) угловую скорость w вращения кривошипа, при которой механизм в условиях отсутствия болтов начнет подпрыгивать над горизонтальной плоскостью,

3) наибольшее горизонтальное усилие, действующее на болты,

движение центра тяжести С1 станины механизма после среза болтов K и L.

Рис. 4. Геометрическая модель наклонной плоскости.

Решение. Материальная система состоит из двух масс: неподвижного колеса 1 со станиной и подвижного колеса 2. Изобразим внешние силы этой системы: Р1 - вес станины и неподвижного колеса 1, Р2 - вес подвижного колеса 2, Ry - суммарная нормальная реакция плоскости, Rx - суммарная тангенциальная реакция болтов K и L. Направим ось Oy по вертикали через точку С1, ось x - вдоль горизонтальной плоскости направо.

Запишем теорему о движении центра масс системы в проекциях на оси x и y:

Mxc=?Fkx, Myc=?Fky, Mzc=?Fkz

В данной задаче

?Fkx=Rx, ?Fky=Ry-P1-P2, Rx= Mxc, (1)

Ry= Myc+P1+P2 (2)

Для определения сил Rx и Ry остается подсчитать Mxc и Myc. Вычисление Mxc и Myc ведется по формулам:

Mxc=?mkxk, Myc=?mkyk.

В данном случае

Mxc= m1 x1+m2 x2 и Myc= m1 y1+m2 y2, (3).

Где x1 и y1 - координаты центра тяжести С1 станины механизма и неподвижного колеса 1, x2 и y2 - координаты центра тяжести С2 подвижного колеса 2.

Как видно из рис., x1=0, y1=ОС1 - постоянная, x1=C1 C2 cosw t=(r1+r2) cos w t (угол поворота кривошипа С1С2 равен ?=wt, так как по условию w постоянна), y2=ОС11С2 sinw t=ОС1+(r1+r2) sinw t.

Вычислив вторые производные x1, y1, x2, y2 по времени t находим x1=0 y1=0, x2=-(r1+r2) w2 cosw t, y2=-(r1+r2) w2 sinw t.

Внеся эти значения в формулы (3), получим:

Mxc= -m2 ( r1+ r2 )w2 соs wt, (4)

Myc= -m2( r1+ r2 )w2 sin wt (5)
После подстановки (4) в (1) и (5) в (2) находим:

Rx = -P2 /g *( r1+ r2 )w2 соs wt (6)

Ry= P1+ P2 - P2/g *( r1+ r2 )w2 sin wt (7)

Давление механизма на горизонтальную плоскость направлено противоположно реакции Ry и по модулю равно ей:

Ny=P1+ P2 -P2 /g *( r1+r2 ) w2 sin wt

Наибольшее давление:

Ny max = P1 + P2+ P2/g * (r1+ r2 ) w2

Наименьшее давление:

Ny min = Р1 + P2 - P2 /g * ( r1 +r2 ) w2

В условиях отсутствия болтов механизм может начать подпрыгивать над горизонтальной плоскостью. Это будет иметь место при Rymin<0, т.е при Р1 +P2-P2/g* (r1 + r2) w2<0, откуда следует, что угловая скорость w вращения кривошипа C1C2, при которой происходит подпрыгивание механизма, должна удовлетворять неравенству

w > vg*(P1+P2) / P2(r1+r2).

Горизонтальное давление, действующее на болты, направлено противоположно Rх (см. формулу (6)), причем

Nx=P2/g*(r1 + r2)w2 coswt.

Наибольшее давление равно

Nxmax=P2/g*(r1 + r2)w2

Допустим, что под действием, силы Nx произошел срез болтов.
Тогда весь механизм начнет двигаться по идеально гладкой горизонтальной плоскости.

На рис. б изображен механизм в положении, когда точка С1 сместилась с оси у направо на х1. Так как станина механизма находится в движении относительно оси х, то х1 является функцией времени t.

Из чертежа видно, что в данном случае

х21 + С1С2 cos wt= х1 + (r1 + r2) cos wt.

Следовательно,

Mxc1х12 x2 = (m1 +m2)x1 - m2 (r1 + r2) w2 cos wt (8)

Теорема о движении центра масс системы материальных точек в проекции на ось х имеет вид

Мхс = ?Fekx

Так как после среза болтов реакция Rx отсутствует, а внешние силы Р1 Р2 и Rу перпендикулярны к оси х, то ?Fkx = 0 и Мхс = 0. Подставив в это уравнение значение Mxс из формулы (8), получим

(т1 +m2) х1 -m2 (r1 + r2) w2 cos wt = 0,

т. е.

x1 = Р2/(Р1+Р2 )*(r1 + r2) w2 cos wt, (9)

Это - дифференциальное уравнение движения центра тяжести С1 станины механизма по идеально гладкой горизонтальной плоскости при отсутствии болтов. Для интегрирования уравнения (9) должны быть известны начальные условия движения точки С1. Так как в момент среза болтов точка C1 находилась на оси у и была в покое, то начальные условия движения записываются в виде:

при t= 0 x1 =0 и y1 = 0.

Проинтегрировав дифференциальное уравнение (9), получим:

x1= Р2/Р1+Р2 *(r1 + r2) w sin wt + D1

После подстановки начального условия движения t = 0 и x1 = 0 имеет D1 = 0, т. е

x1= Р2/Р1+Р2 *(r1 + r2) w sin wt

Вторично проинтегрировав, находим х1 = - Р212 *(г1 + r2) cos wt +D2. Использовав то, что при t=0, х1=0, имеем:

D2 = Р212 *(r1 + r2)

т.е. x1 = Р2 / Р12 *(r1 + r2 )(1-cos wt).

Итак, центр тяжести С1 станины механизма в случае отсутствия болтов совершает гармонические колебания с амплитудой Р212 *(r1 + r2) и круговой частотой, равной угловой скорости w вращения кривошипа С1С2.

Эту задачу можно решить также с помощью уравнения динамики переносного движения. Как известно, переносное поступательное движение системы происходит как движение абсолютное под действием всех внешних сил системы и сил инерции масс в их относительном движении, т.е.

Mwe=?Fk+?Jrk ,

где Fk-- внешние силы, a Jrk -- силы инерции в относительном движении.

В проекциях на оси декартовых координат имеем:

Мхе =? Fkxe+ ?Jrkx Муе = ?Fkye + ?Jrky,

k=1

Мzе = ?Fkze + ?Jrkz

k=1

В данной задаче колесо 2, участвуя в переносном поступательном движении вместе с колесом 1 и станиной, совершает относительное вращательное движение вокруг оси, проходящей через центр тяжести С1 колеса 1и станины перпендикулярно к плоскости ху.

Изобразив все внешние силы системы Р1, Р2, Rx и Ry (см. рис. в), добавляем центробежную силу инерции в относительном движении

Jrn = -Р2 /g*wrn. Так как точка С2 в относительном движении описывает окружность с центром С1 радиуса С1С2 = r1+ r2, то, центро-стремительное ускорение wrn, направлено от С2 к С1 и, следовательно, центробежная сила инерции в относительном движении Jrn направлена противоположно. По модулю

Jrn = -Р2 /g*wrn= Р2 /g*(r1+ r2)w2

Вращательная сила инерции в относительном движении Jr? = -Р2 /g*wr? равна нулю, так как кривошип вращается равномерно. Применив дифференциальные уравнения переносного поступательного движения материальной системы в проекциях на оси х и у:

Мхе =? Fkxe+ ?Jrkx , Муе = ?Fkye + ?Jrky,

k=1 k=1 k=1 k=1

получим

Mxe =Rx+Jrn coswt, Mye =Re -- P1-- P2+Jrn sinwt,

Так как хe = х1 ,ye=y1 , Jrn =P2/g*(r1+r2) w2, то

Мх1=Rx+P2/g(r1+r2)w2coswt , (10)

My1=Ry-P1- Р2 +P2/g (r1 + r2) w2 sinwt. (11)

В случае механизма, закрепленного болтами, центр тяжести С1 колеса 1 и станины неподвижен , т. е. х11=0, и дифференциальные уравнения принимают вид

Rx+P2/g(r1+r2)w2coswt =0, (12)

Ry- -P1- Рг +P2/g (r1 + r2) w2 sinwt , (13)

откуда вытекает, что проекция нормальной реакции плоскости равна

Ry = P1 - Рг +P2 /g (r1 + r2) w2 sinwt. (14)

Проекция на ось х горизонтальной силы реакции болтов равна

Rx= P2 / g (r1+r2 )w2coswt. (15)

Условие подпрыгивания определяем из (14), считая R у min отрицательным. Так как

Rymin = P1 + Рг - P2 /g *(r1 + r2) w2, а Ry min<0 , то

P1 +Р2 -P2 /g *(r1 + r2) w2<0

откуда w>v g*(P1+P2)/(P2(r1+r2 ))

Для определения закона движения центра тяжести CL колеса 1 и станины механизма после среза болтов надо в формуле (10) положить Rx = 0. Тогда

Мх1 = P2/g*(r1 + r2) w2 coswt ,

Т.е. приходим к уравнению (9):

x1=P2 /(P1+ P2 )*(r1 + r2 ) w2cos wt ,

решение которого было получено выше.

На основе разработанного алгоритма решения задачи по кинематике составим Паскаль - программу.

Program DINAMIKA;

Var

w,r1,r2,P1,P2,t,NxMax,Ny,x1:Real;

Const

g=9.8;

Begin

Writeln ('vvedite radius r1');

Readln (r1);

Writeln ('vvedite radius r2');

Readln (r2);

Writeln ('vvedite ves P1');

Readln (P1);

Writeln ('vvedite ves P2');

Readln (P2);

Writeln ('vvedite vremya');

Readln (t);

w:=sqrt((g*(P1+P2))/(P2*(r1+r2)));

Ny:=P1+P2-(P2/g)*(r1+r2)*w*w*cos(w)*t;

NxMax:=P2/g*(r1+r2)*w*w;

x1:=P2/P1+P2*(r1+r2)*(1-cos(w)*t);

Writeln ('w:=',w);

Writeln ('Ny:=',Ny:8:6);

Writeln ('NxMax:=',NxMax:8:6);

Writeln ('x1:=',x1:8:6);

Readln;

End.

ЗАКЛЮЧЕНИЕ

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

Задачами данной работы являлись:

1. Освоение полного спектра функциональных возможностей языка программирования Паскаль;

2. Постановка и решение задач прикладной механики традиционным способом;

3. Решение задач механики в среде языка программирования Паскаль.

Методами работы при выполнении поставленных задач:

1. Теоретический анализ научно-технической литературы по языку программирования Паскаль;

2. Математическое моделирование задач прикладной механики;

3. Компьютерное решение задач прикладной механики.

На основе проведенного курсового исследования на тему «Приложения технологии языка программирования паскаль в прикладной механике» можно сформулировать следующие выводы:

1. Язык программирования высокого уровня Паскаль обладает широким спектром логических конструкций и функций, необходимых для успешного решения задач прикладной механики.

2. Информационное моделирование механических явлений средствами логики и высшей математики позволяет достаточно быстро перевести решение задач прикладной механики на уровень компьютерных вычислений посредством языка программирования Паскаль.

ЛИТЕРАТУРА

1. Бать М.И., Джанелидзе Г., Кельзон А.С. Теоретическая механика в примерах и задачах. Т.1. М.: Просвещение, 2000.

2. Бать М.И., Джанелидзе Г., Кельзон А.С. Теоретическая механика в примерах и задачах. Т.2. М.: Просвещение, 2000.

3. Бочкин А. И. Методика преподавания информатики. - Минск: Высшая школа, 1998.

4. Блашкин И.И., Буров А.А. Новые возможности Turbo-Pascal 6.0. -- Спб.: Изд-во «Макет», 1992.

5. Бородич Ю.С. и др. Паскаль для персональных компьютеров: Справ. пособие/ Ю.С.Бородич, А.Н.Вальвачев, А.И.Кузьмич. -- Мн.: Выш. шк.: БФ ГИТМП «НИКА», 1991.

6. Васильев П.П. Турбо Паскаль -- мой друг: М.: Компьютер, ЮНИТИ, 1995.

7. Великов В.П., Новая информатика в школе // Информатика и образование. - 1986. - №1.

8. Вычислительная техника и программирование. Под редакцией А. В. Петрова М., Высшая школа, 1990.

9. Голубева О.В. Теоретическая механика. Изд-во «Высшая школа». М.: 1968.

10. Донцов Д.А. Самые нужные программы для Windows. Популярный самоучитель.- Спб.: Питер, 2006.

11. Джордейн Р. Справочник программиста персональных компьютеров типа IBM PC, XT, AT: Пер. с англ./ Предисл. Н.В.Гайского. -- М.: Финансы и статистика, 1991.

12. Зозуля Ю. Компьютер на 100 % - Спб.: Питер, 2006.

13. Зуев Е.А. Язык программирования Turbo Pascal 6.0. -- М.: Унитех, 1992.

14. Информатика. Базовый курс: Учеб. пособ. для студентов технических вузов / С.В. Симонович, Г. Евсеев, В. И. Мухаровский и др.; под ред. Симоновича - Спб.: Питер, 2005.

15. Информатика: Учеб. пособ. для пед. спец. вузов /А.Р. Есаян, В.И. Ефимов, Л.П. Липецкая и др. - М.: Просвещение, 1991.

16. Лапчик М. П. Методика преподавания информатики. М.: Посвещение, 2001.

17. Левин А. Самоучитель полезных программ 3-е изд.- Спб.: Питер, 2003.Турбо Паскаль 7.0 - К.: Издательская группа BHV, 1998.

18. Марченко А. И., Марченко Л. И. Программирование в среде Turbo-Pascal 7.0-М., Бином Универсал, К.: Юниор, 1997.

19. Мизрохи А.М. Turbo Pascal и объектно-ориентированное программирование. -- М.: Финансы и статистика, 1992.

20. Немнюгин С.А. Turbo Pascal. Программирование на языке высокого уровня. Учебник для вузов. 2-е изд.- Спб.: Питер, 2005.

21. Рывкин К.А. Справочник школьника по информатике. 7-11 кл. - М.: ООО Изд. дом «Оникс 21 век », 2005.

22. Справочник по процедурам и функциям Borland Pascal with Objects 7.0. -- Киев: «Диалектика», 1993.

23. Фарафонов В.В. Турбо Паскаль 7.0. Начальный курс: учеб. пособие. - М.: Кнорус, 2006.

24. Фёдоров А. Особенности программирования на Borland Pascal. -- Киев: «Диалектика», 1994.

25. Хершель Р. Турбо Паскаль/ 2-е изд., перераб. -- Вологда: МП «МИК», 1991.

26. POWER TOOLS PLUS. Процедуры поддержки для Turbo Pascal 4.0.: Справочное руководство пользователя. Техническая документация.


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

  • Основные сведения о системе программирования Турбо Паскаль. Структура программы на Паскале и ее компоненты. Особенности и элементы языка Турбо Паскаль. Порядок выполнения операций в арифметическом выражении, стандартные функции и оператор присваивания.

    лекция [55,7 K], добавлен 21.05.2009

  • Программирование нестандартных функций, задач оптимизации, дифференциального уравнения и аппроксимации с помощью языка Паскаль. Алгоритм и программа операций над матрицами. Нахождение значения корней нелинейного уравнения по методу половинного деления.

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

  • Общая характеристика языков программирования. Описание языка Паскаль: основные субъекты языка; структура Паскаль-программы; типизация и объявление данных. Операторы присваивания и выражения. Структурные операторы, организация ветвлений и циклов.

    дипломная работа [276,6 K], добавлен 26.01.2011

  • Изучение истории создания языка Турбо-Паскаль, важнейшего инструмента для обучения методам структурного программирования. Анализ меню управления всеми ресурсами интегрированной инструментальной оболочки, зарезервированных слов, символьных переменных.

    презентация [989,7 K], добавлен 06.12.2011

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

    лабораторная работа [189,8 K], добавлен 17.04.2012

  • Создание приложения, исполняющего трансляцию программы из языка Паскаль в язык Си: разработка алгоритма реализации задачи, описание необходимых констант, переменных, функций и операторов, представление листинга программы и распечатка результатов.

    курсовая работа [305,9 K], добавлен 03.07.2011

  • Лингвистическая концепция языка Паскаль. Интегрированная инструментальная оболочка. Основы построения программ на ТП 7.0. Алфавит языка и специфика использования символов. Простые типы данных: константы и переменные. Циклические конструкции и операции.

    курсовая работа [284,6 K], добавлен 02.07.2011

  • История и основы структурного программирования в среде Turbo Pascal. Работа с различными типами данных. Операторы языка. Работа с символьными и строковыми переменами, одномерным, двумерным массивами. Классификация компьютерных игр. Игры на языке Паскаль.

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

  • Особенности программирования на языке Паскаль в среде Турбо Паскаль. Линейные алгоритмы, процедуры и функции. Структура данных: массивы, строки, записи. Модульное программирование, прямая и косвенная рекурсия. Бинарный поиск, организация списков.

    отчет по практике [913,8 K], добавлен 21.07.2012

  • Основы создания фрактальных композиций при помощи среды программирования Паскаль. Сущность и основа фрактальной графики. Графические возможности и операторы для рисования геометрических фигур в среде Паскаль. Примеры обозначения цветов на языке Паскаль.

    лабораторная работа [15,7 K], добавлен 12.06.2010

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