СТЕРЕОМЕТРИЯ ЕСЕПТЕРІН КОМПЬЮТЕРЛІК МОДЕЛЬДЕУ
Жоғары мектеп курсының математикасында стереометрия курсы кеңістіктік ойлауды дамыту бойынша маңызды есептердің бірі болып табылады. Стереометрия курсын теориялық және практикалық тұрғыда оқып үйрену үшін геометриялық денелерді кеңістікте елестете білу қажет. Қазіргі заманғы бағдарламалық қамтамасыз етілу математика саласында геометриялық объектілерді және олардың нақты қасиеттерін көрнекі жағдайда бағдарламалардың кең ауқымын ұсынады. Соңғы жылдары математика саласында Maple визуалды бағдарламасы кеңінен қолданылады. Бұл бағдарлама арқылы тіпті анимациялық кескіндерді алуға болады. Maple жүйесінде екі өлшемді және үш өлшемді кеңістіктерге арналған командалар мен процедуралар жиынтығы бар. Maple бағдарламалау тілінің ерекшелігін кәсіби маман еместер де меңгере алады.Мектеп бағдарламасының стереометрия курсында оқушылардың кеңістіктік ойлау қабілетінің дамуының жоғары деңгейін талап ететін проблемалық сипатта кездесетін есептердің қоры мол. Сондай-ақ, 11 сыныпта «Көлемдер» тақырыбын қарастырған кезде күрделі есептеулер жүргізіледі. Мұндай есептерді шығару кезінде кеңістіктік суреттерді құруда кейбір қиындықтар болуы мүмкін. Сондықтан, оқушының ойлау қабілетін арттыру мақсатында визуалды кеңестер жиынтығы болуы керек.Maple визуалды бағдарламасында мысал келтірейік.
> with(plots): with(plottools): A:=plot3d([x,y,3],x=0..2,y=0..1,grid=[2,2]): B:=plot3d([2,x,y],x=0..1,y=0..3,grid=[2,2]): C:=plot3d([x,1,y],x=0..2,y=0..3,grid=[2,2]): DD:=plot3d([x,0,y],x=0..2,y=0..3,grid=[2,2]): E:=plot3d([x,y,2],x=0..1,y=1..2,grid=[2,2]): F:=plot3d([0,x,y],x=0..1,y=0..3,grid=[2,2]):FF:=plot3d([0,x,y],x=2..3,y=2..3, grid=[2,2]): G:=plot3d([0,x,y],x=1..3,y=0..2,grid=[2,2]): K:=plot3d([x,y,0],x=0..3,y=1..3,grid=[2,2]): M:=plot3d([x,y,0],x=0..2,y=0..1,grid=[2,2]): N:=plot3d([3-2*y,3-2*x,2*y],x=0..1,y=0..1,grid=[2,2]): P:=plot3d([1-y,3- x,2+y],x=0..1,y=0..1,grid=[2,2]):T:=plot3d([3- x,3,y],x=0..3,y=0..x,grid=[2,2]): S:=plot3d([1- x,2,2+y],x=0..1,y=0..x,grid=[2,2]): SS:=plot3d([3- x,1,y],x=0..1,y=0..x,grid=[2,2]): ST:=plot3d([1+x,1,2- y],x=0..1,y=0..x,grid=[2,2]): plots[display]([A,B,C,DD,E,F,FF,G,K,M,N,P,T,S,SS],style=patch,scaling= constrained);
Нәтижесі 2 суретте көрсетілгендей анимациялық үш өлшемді моделі
Мысал 2. > with(plottools):with(plots): ff:=PLOT3D(CURVES([[1,1,0],[0,1,0]],COLOR(HUE,0.7),THICKNESS(1)), STYLE(PATCH)): fff:=PLOT3D(CURVES([[0,0,0],[1,1,1]]),COLOR(HUE,0.9),THICKNESS(3)): f:=display([ff,fff]): RTS:=[seq(U[k],k=0..40)]: for k from 0 to 40 do b:=k*0.25*Pi: U[k]:=rotate(f,b,[[0,0,0],[1,1,1]]): end do: RRT:=[seq(Y[j],j=0..40)]: for j from 0 to 40 do RRS:=[seq(T[i],i=0..j)]: for i from 0 to j do b:=i*0.12*Pi: T[i]:=rotate(f,b,[[0,0,0],[1,1,1]]): end do: Y[j]:=plots[display](RRS[],scaling=constrained,style=patch):end do: display(RTS[],RRT[],insequence=true,scaling=constrained,style=patch;
Мысал 3. Көпжақтардан құралған айналу денесі
> with(plottools):with(plots): f := cu-boid([0,0,0],[1,1,1]):fff:=PLOT3D(CURVES([[0,- 0.5,0],[0,1.5,0]]),COLOR(HUE,0.9),THICKNESS(3)): f:=display([ff,fff]): RTS:=[seq(U[k],k=0..40)]: for k from 0 to 40 do b:=k*0.25*Pi: U[k]:=rotate(f,b,[[0,0,0],[0,1,0]]): end do: RRT:=[seq(Y[j],j=0..15)]: for j from 0 to 15 do RRS:=[seq(T[i],i=0..j)]: for i from 0 to j do b:=i*0.125*Pi: T[i]:=rotate(f,b,[[0,0,0],[0,1,0]]): end do: Y[j]:=plots[display](RRS[],scaling=constrained,style=patch):end do: display(RTS[],RRT[],insequence=true,scaling=constrained,style=patch;
Айналу денесінің нәтижесі 4 суретте көрсетілген.Мысал 4. > with(plottools):with(plots): ff := cuboid([0,0,0],[1,1,1]): fff:=PLOT3D(CURVES([[-0.5,-0.5,- 0.5],[1.5,1.5,1.5]]), COLOR(HUE,0.9), THICKNESS(3)): f:=display([ff,fff]): RTS:=[seq(U[k],k=0..40)]: for k from 0 to 40 do b:=k*0.25*Pi: U[k]:=rotate(f,b,[[0,0,0],[1,1,1]]): end do: RRT:=[seq(Y[j],j=0..15)]: for j from 0 to 15 do RRS:=[seq(T[i],i=0..j)]: for i from 0 to j do b:=i*0.125*Pi: T[i]:=rotate(f,b,[[0,0,0],[1,1,1]]): end do: Y[j]:=plots[display](RRS[],scaling=constrained,style=patch):end do: display(RTS[],RRT[],insequence=true,scaling=constrained,style=patch;
Ізделінді фигуралардың сызбасын оқушылар геометриялық жобалау арқылы өз беттерінше орындай алады.
Мысал 5. > with(plots):with(plottools): f:=PLOT3D(POLYGONS([[0,0,0],[1,0,0], [0.5,0.5*sqrt(3.0),0]], [[1,0,0],[0.5,0.5*sqrt(3.0),0],[0.5,sqrt(3.0)/6,sqrt(6.0)/3]], [[0,0,0],[1,0,0],[0.5,sqrt(3.0)/6,sqrt(6.0)/3]], [[0,0,0],[0.5,0.5*sqrt(3.0),0],[0.5,sqrt(3.0)/6,sqrt(6.0)/3]]), STYLE(PATCH)): g:=rotate(f,Pi/2,[[0.5,0,0],[0.5,sqrt(3.0)/3,sqrt(6.0)/6]]): display([f,g],scaling=constrained);
Мысал 6. > with(plots):with(plottools): f:=PLOT3D(POLYGONS([[0,0,0], [1,0,0],[1,1,0],[0,1,0]], [[0,0,0],[0,1,0],[0,1,1],[0,0,1]], [[1,0,0],[1,1,0],[1,1,1],[1,0,1]], [[0,0,0],[1,0,0],[1,0,1],[0,0,1]], [[0,1,0],[1,1,0],[1,1,1],[0,1,1]], [[0,0,1],[1,0,1],[1,1,1],[0,1,1]]), TITLE(CUBE),STYLE(PATCH)): g:=rotate(f,Pi/2,[[0,0,0.5],[1,1,0.5]]):display([f,g],scaling=constained);
Кеңістіктік ойлау қабілетінің дамуы және компьютерлік технологияны меңгеру стереометрия есептерін зерттеуге үлкен мүмкіндіктер береді.