120 likes | 297 Views
Дослідне визначення модуля Юнга та опрацювання результатів з допомогою мови програмування Паскаль. структура програми в середовищі Turbo Pascal; структура циклів; кристалічні та аморфні тіла; пружність, пластичність, міцність; типи даних у мові Pascal ; закон Гука.
E N D
Дослідне визначення модуля Юнга та опрацювання результатів з допомогою мови програмування Паскаль
структура програми в середовищі Turbo Pascal; • структура циклів; • кристалічні та аморфні тіла; • пружність, пластичність, міцність; • типи даних у мові Pascal; • закон Гука. Сало Б. Я. 2009
З яких основних розділів складається програма в середовищі Turbo Pascal? • Який порядок прийнятий в розділі описів та оголошень? • Які типи даних ви знаєте? • Яка структура розділу операторів? • Що таке цикл? • З яких основних етапів складається цикл? • Які типи циклів Ви знаєте? Сало Б. Я. 2009
Яка особливість будови кристалічних та аморфних тіл? Яка деформація називається пружною, пластичною? Сформулюйте закон Гука. Яка з фізичних величин, абсолютне чи відносне видовження більш об’єктивно характеризує пружну деформацію? Що таке міцність? Яку фізичну величину називають межею міцності? Що характеризує модуль Юнга? Сало Б. Я. 2009
1 Початок 1 g:=9,81; Δl:=0,005 Δm:=0,001; Δd:=0,001 11 Ec:=E1/n 2 12 Вивести Еc 3 Ввести n, d, l0 P:= Δl/l+ Δm/m+ 2Δd/+Δl/(l-l0) 13 S:=πd2/4 4 ΔE:=p·Ec 14 E1:=0 5 15 Вивести ΔE 6 i:=1 ,n, 1 16 Вивести p 7 Ввести m, l Кінець 17 8 9 Вивести Е 10 E1:=E1+E 1 Сало Б. Я. 2009
g:=9,81; Δl:=0,005 Δm:=0,001; Δd:=0,001 2 3 Ввести n, d, l0 • В блоці2 розміщені числові значення вели-чин g, Δm, Δl, Δd. В якому місці програми доцільно розташувати ці величини? • Яка команда в мові Паскаль відповідає блоку 3? • Чим бажано доповнити команду введення? Сало Б. Я. 2009
6 i:=1 ,n, 1 7 Ввести m, l 8 9 Вивести Е 10 E1:=E1+E 4. Чим є послідовність команд 6-10? 5. Яка структура циклу з параметром у мові Паскаль? 6. Яку величину Ви використовували, як параметр циклу? Сало Б. Я. 2009
Шаблон програми program modul_yunga; uses crt; const g=9.81;dl=0.001;dm=0.001;dd=0.0001; var n, i:integer; d, l0, l, s, Е, Еc, m, f а, p, dЕ :real; begin clrscr; ……………………… repeat until keypressed; end. Сало Б. Я. 2009
program modul_yunga; uses crt; const g=9.81;dl=0.005;dm=0.002;dd=0.0001; var n,i:integer; d,l0,l,s,E,Ec,m,f,p,dE:real; begin clrscr; write('Vvestu n,d,l0'); read(n,d,l0); s:=pi*sqr(d)/4; E:=0; for i:=1 to n do begin write('Vvestu m,l'); read(m,l); F:=g*m; writeln('E',i,'=',F*l/s/(l-l0)); E:=E+F*l/s/(l-l0); end; Ec:=E/n; writeln; writeln('Ec=',Ec); p:=dl/l+dm/m+2*dd/d+dl/(l-l0); dE:=Ec*p; writeln('p=',p:6:2); writeln('dE=',dE); repeat until keypressed; end. Текст програми Сало Б. Я. 2009
Підсумок уроку • Які структурну одиницю програми Ви сьогодні використали для опрацювання результатів лабораторної роботи? • Яка відмінність циклу з параметром від інших типів циклів? • Якщо в тілі циклу з параметром міститься більше однієї команди необхідно…… • Чим викликана розбіжність у значеннях модуля Юнга в дослідах? • Вимірювання якої величини призвело до збільшення похибки вимірювань? Сало Б. Я. 2009
Домашнє завдання • Оформити звіт до лабораторної роботи. • Виконати вправу: Знайти кількість зернин, що розмістяться на шаховій дошці, запов-неній таким чином: на першій клітинці (нумерація, здійснюється по рядках, почи-наючи з верхньої лівої і закінчуючи ниж-ньою правою клітинкою) – одна зернина, на кожній наступній – вдвічі більше, ніж на попередній. (Шахова легенда) Сало Б. Я. 2009