Физика – 10

Тема: Практическая работа. Компьютерное моделирование движения точки .

Цель урока:

- обеспечить усвоение учащимися моделирование движения точки;

- воспитание мотивов учения, положительного отношения к знаниям;

- развитие аналитико-синтезирующего мышления.

Тип урока: комбинированный.

Методы обучения: словесный, наглядный, практический.

Форма обучения: коллективная.

Оснащение: проектор, компьютеры с языком программирования Паскаль.

Ход урока.

1. Орг.момент, записи в журнале.

2. Формирование новых знаний и способов действий.

Компьютерная программа. 

При запуске программа рисует графики зависимостей координаты x = x(t), проекции скорости v_x = v_x (t) и проекции ускорения a_x = a_x (t). Некоторые строчки программы заключены в скобки "(*" и "*)". Убрав скобки и активизировав соответствующие операторы, можно промоделировать различные явления.

program PROGRAMMA2;
uses dos, crt, graph;
Const Fm=10;w=5;m=2;r=0;k=0;
Mx=20; Mv=40; Ma=8; Mf=2; Mt=100;
dt=0.00006;
Var x,v,a,F,t : Real;
j,xx,vv,aa,FF,tt,Gd,Gm : Integer;
BEGIN
Gd:= Detect;
InitGraph(Gd, Gm, 'c:\bp\bgi');
if GraphResult<>grOk then Halt(1);
t:=0; v:=0; x:=-3;
line(30,300,650,300);
line(31,500,31,10);
OutTextXY(50,20,'X, V, A');
Repeat
begin {Задание функции F=F(t)}
t:=t+dt; (* F:=Fm*sin(w*t); *)
(*If sin(w*t)<0 then F:=0;
If sin(w*t)>0 then F:=Fm;*)
F:=0; If t<1 then F:= Fm;
If t>3 then F:=-Fm;
a:=(F-r*v-k*x)/m; x:=x+v*dt; v:=v+a*dt; tt:=round(t*Mt);
xx:=round(x*Mx); vv:=round(v*Mv); aa:=round(a*Ma); FF:=round(F*Mf);
circle(30+tt,300-xx,1); circle(30+tt,300-vv,1); circle(30+tt,300-aa,2);
end;
until KeyPressed;
CloseGraph;
END.

3. Итог урока.

4. Домашнее задание повторить формулы и определения.

15.10.2014

Утверждаю