Рабочие листы
к вашим урокам
Скачать
1 слайд
ТРИ В ОДНОМ или МАТЕМАТИКА + ФИЗИКА = ИНФОРМАТИКА Замечательная программа для работы с тригонометрическими функциями и их применением на уроках математики и физики Выполнили: Стоянов Денислав Радославов, 7 г класс Теплова Елизавета Максимовна, 7 в класс ГБОУ СОШ №167 имени Маршала Л.А. Говорова, г.Москва Руководитель: Незнанов Сергей Александрович – inform3.1601@gmail.com, nsa59@mail.ru Руководитель: Незнанов Сергей Александрович – inform3.1601@gmail.com, nsa59@mail.ru
2 слайд
Компьютерная программа «ТРИ В ОДНОМ» Выполнена в Visual Basic, скомпилирована в исполняемый файл. Предоставлена возможность модификации и дальнейшего усовершенствования программы. Представлен исходный программный код. Цели и задачи: Создать программу наглядного обучения математике и компьютерного моделирования физических процессов и явлений с использованием математических функций. Развивать навыки и умения при работе с тригонометрическими функциями, развивать логическое, математическое и пространственное мышление учащихся. Создание простой и удобной компьютерной программы для изучения и отработки навыков работы с координатной плоскостью и построением графиков функций.
3 слайд
Разработана интересная обучающая компьютерная программа ТРИ В ОДНОМ, которая предназначена для изучения и отработки навыков работы с тригонометрическими функциями, с графиками на координатной плоскости, компьютерного моделирования и изучения механического движения. Предназначена для учителей математики, информатики и физики и, соответственно, учащихся 7-х - 11-х классов при изучении тем "Тригонометрические функции", "Графики функций", "Системы счисления", "Моделирование", "Механическое движение" и т.д. Отрабатываются навыки и умения работы с графиками функций, координатной плоскостью, отображаются значения функций и их графики, наглядно показано применение математических функций в компьютерном моделировании и физическом эксперименте. Язык программирования Visual Basic позволяет быстро и наглядно решить вопросы создания и улучшения возможностей этой программы. Программа не требует установки, состоит из одного файла, открытый программный код, возможность быстро доработать и внести изменения, совершенно бесплатна. Учащиеся с удовольствием работают с программой, высказанные пожелания позволяют оперативно улучшить работу и интерфейс программы. Полученные результаты
4 слайд
Интерфейс программы (основное окно)
5 слайд
Интерфейс программы (общий) и окна
6 слайд
Интерфейсы похожих программ сайт студентов МИФИ (блокируется) и ещё на сайте http://egeurok.ru/load/onlajn_kalkuljatory_po_matematike/trigonometricheskij_edinichnyj_krug_onlajn/35-1-0-499
7 слайд
Dim x, y As Double Dim i, uu As Double Dim a As Integer Public u As Double Public ii As Double Private Sub Command1_Click() Form3.Show End Sub Private Sub Command2_Click() Form2.Show End Sub Private Sub Form_Load() Scale (-200, -200)-(200, 200) DrawWidth = 5 Circle (0, 0), 160, QBColor(2) DrawWidth = 1 For x = -192 To 192 Step 16 Line (x, -176)-(x, 176) Line (x + 1, -3)-(x - 1, 2), , BF: Print x / 160 Next x For y = -176 To 176 Step 16 Line (-192, y)-(192, y) Line (-3, y + 1)-(2, y - 1), , BF: Print -y / 160 Next y DrawWidth = 3 Line (-192, 0)-(192, 0) Line (0, 176)-(0, -176) For x = -192 To 192 Step 1 PSet (x, 160 * (-1) * Sin(x * 3.141592 / 180)), RGB(255, 0, 0) Next x For x = -192 To 192 Step 1 PSet (x, 160 * (-1) * Cos(x * 3.141592 / 180)), RGB(0, 0, 255) Next x i = 0: u = 0: a = 1 End Sub Private Sub Timer1_Timer() If Text1 <> "" Then If Val(Text1) < -360 Or Val(Text1) > 360 Then VScroll1.Value = -(Val(Text1) - 360 * Int(Val(Text1) / 360)): a = 0 Else VScroll1.Value = -Val(Text1): a = 0 If Option1.Value = True Then a = 0: Option2.Value = False Else a = HScroll1.Value: Option1.Value = False: Option2.Value = True If VScroll1.Value >= 360 Or VScroll1.Value <= -360 Then VScroll1.Value = 0 Else VScroll1.Value = VScroll1.Value - a i = (VScroll1.Value + a) * 3.141592 / 180: ii = i x = 0 + 160 * Cos(i) y = 0 + 160 * Sin(i) Shape1.Left = x - 4 Shape1.Top = y - 4 Xx = 0 + u Yy = 0 + 160 * Sin(i) Shape2.Left = Xx - 4 Shape2.Top = Yy - 4 Xxx = 0 + u Yyy = 0 - 160 * Cos(i) Shape3.Left = Xxx - 4 Shape3.Top = Yyy - 4 Line1.X1 = 0: Line1.Y1 = 0: Line1.X2 = 0 + 160 * Cos(i): Line1.Y2 = 0 + 160 * Sin(i) Line2.X1 = x: Line2.Y1 = 0: Line2.X2 = 0 + 160 * Cos(i): Line2.Y2 = 0 + 160 * Sin(i) Line3.X1 = 0: Line3.Y1 = y: Line3.X2 = 0 + 160 * Cos(i): Line3.Y2 = 0 + 160 * Sin(i) Line5.X1 = x: Line5.Y1 = 0: Line5.X2 = 0: Line5.Y2 = 0 Line4.X1 = 0: Line4.Y1 = y: Line4.X2 = 0: Line4.Y2 = 0 Программный код
8 слайд
Label2.Caption = -Int(Sin(i) * 100000) / 100000: Label4.Caption = Int(Cos(i) * 100000) / 100000 If Cos(i) <> 0 Then Label9.Caption = -Int(Tan(i) * 100000) / 100000 Else Label9.Caption = "Н/О" If Tan(i) <> 0 Then Label10.Caption = -Int((1 / Tan(i)) * 100000) / 100000 Else Label10.Caption = "Н/О" 'u = -Int(i * 180 / (3.141592)) 'If u > 360 Then u = u - 360 'If u < -360 Then u = u + 360 u = -(VScroll1.Value + a): uu = -Int(i * 100000) / 100000 If u = 0 Then Label2.Caption = 0: Label4.Caption = 1 If u = 180 Or u = -180 Then Label2.Caption = 0: Label4.Caption = -1 If u = 90 Or u = -90 Then Label2.Caption = 1: Label4.Caption = 0 If u = 360 Or u = -360 Then Label2.Caption = 0: Label4.Caption = 1 If u = 270 Or u = -270 Then Label2.Caption = -1: Label4.Caption = 0 Label6.Caption = Str(u) + " град.=" + Str(uu) + " рад." End Sub Dim x, y As Double Dim u, uu As Double Dim i, k As Integer Dim x0(1000), y0(1000), c(1000), d, g As Integer Dim a As Double Private Sub Command1_Click() Cls Timer1.Interval = 5: If k = 6 Then k = 0 DrawWidth = 1 Scale (-400, -400)-(400, 400) For x = -360 To 360 Step 36 Line (x, -360)-(x, 360) Next x For y = -360 To 360 Step 36 Line (-360, y)-(360, y) Next y DrawWidth = 4 Line (-360, 0)-(360, 0) Line (0, 360)-(0, -360) i = 0: u = 0: k = k + 1 End Sub Private Sub Form_Load() DrawWidth = 1 Scale (-400, -400)-(400, 400) For x = -360 To 360 Step 36 Line (x, -360)-(x, 360) Next x For y = -360 To 360 Step 36 Line (-360, y)-(360, y) Next y
9 слайд
DrawWidth = 4 Line (-360, 0)-(360, 0) Line (0, 360)-(0, -360) i = 0: u = 0: k = 1 For i = 0 To 1000 If i <> 0 Then Load Shape1(i) x0(i) = Int(Rnd() * 4 * Cos(i / 10) + 5) y0(i) = Int(Rnd() * 4 * Sin(i / 10) + 9) Shape1(i).Top = y0(i) Shape1(i).Left = x0(i) Shape1(i).FillStyle = 0 Shape1(i).FillColor = RGB(Int(Rnd() * 255), Int(Rnd() * 255), Int(Rnd() * 255)) Shape1(i).Shape = 3 Shape1(i).Visible = False Next i a = -360 End Sub Private Sub Timer1_Timer() If k = 1 Then Label1 = "y=sin(x)" If k = 2 Then Label1 = "y=cos(x)" If k = 3 Then Label1 = "y=tg(x)" If k = 4 Then Label1 = "y=x*x - парабола" If k = 5 Then Label1 = "Окружность" If k = 6 Then Label1 = "Цветочек" a = a + 1 x = a If k = 1 Then y = -Int(200 * Sin(a / 180 * 3.141592)) If k = 2 Then y = -Int(200 * Cos(a / 180 * 3.141592)) If k = 3 And Cos(a / 180 * 3.141592) <> 0 Then y = -Int(20 * Tan(a / 180 * 3.141592)) If k = 4 Then y = -100 * (a / 180 * a / 180) If k = 5 Then x = -Int(200 * Cos(a / 180 * 3.141592)): y = -Int(200 * Sin(a / 180 * 3.141592)) * 0.7 If k = 6 Then x = -Int((200 + 50 * Cos(20 * a / 180 * 3.141592)) * Cos(a / 180 * 3.141592)): y = -Int((200 + 50 * Cos(20 * a / 180 * 3.141592)) * Sin(a / 180 * 3.141592)) * 0.7 PSet (x, y), RGB(0, 0, 255) If a = 360 Then a = -360: Timer1.Interval = 0 End Sub Private Sub Command1_Click() Text3 = Val(Text1) + Val(Text2) End Sub Private Sub Command10_Click() If Text1 <> "" Then If Sin(Val(Text1) / 180 * 3.141592) <> 0 Then Text3 = 1 / Tan(Val(Text1) / 180 * 3.141592) Else Text3 = "Ошибка!" If Text2 <> "" Then If Sin(Val(Text2)) <> 0 Then Text3 = 1 / Tan(Val(Text2)) Else Text3 = "Ошибка!" End Sub Private Sub Command2_Click() Text3 = Val(Text1) - Val(Text2) End Sub Private Sub Command3_Click() Text3 = Val(Text1) * Val(Text2) End Sub Private Sub Command4_Click() If Val(Text2) <> 0 Then Text3 = Val(Text1) / Val(Text2) Else Text3 = "Ошибка!" End Sub Private Sub Command5_Click() Text3 = Val(Text1) ^ Val(Text2) End Sub Private Sub Command6_Click() Text3 = "" Text1 = "" Text2 = "" End Sub Private Sub Command7_Click() If Text1 <> "" Then Text3 = Sin(Val(Text1) / 180 * 3.141592) Else Text3 = Sin(Val(Text2)) End Sub Private Sub Command8_Click() If Text1 <> "" Then Text3 = Cos(Val(Text1) / 180 * 3.141592) Else Text3 = Cos(Val(Text2)) End Sub Private Sub Command9_Click() If Text1 <> "" Then If Cos(Val(Text1) / 180 * 3.141592) <> 0 Then Text3 = Tan(Val(Text1) / 180 * 3.141592) Else Text3 = "Ошибка!" If Text2 <> "" Then If Cos(Val(Text2)) <> 0 Then Text3 = Tan(Val(Text2)) Else Text3 = "Ошибка!" End Sub
Рабочие листы
к вашим урокам
Скачать
«Программирование и проектная деятельность учащихся»
Автор: Незнанов Сергей Александрович, nsa59@mail.ru
Государственное бюджетное образовательное учреждение города Москвы средняя общеобразовательная школа № 167 имени Маршала Л.А.Говорова
Аннотация
Проектная и исследовательская деятельность является важнейшей творческой составляющей учебного процесса и информатики в частности. Предмет информатика располагает к этой деятельности, а именно: большинство всех проектов и исследований по любым учебным предметам выполнены или представлены с использованием программных и аппаратных средств информатики. Рассмотрим это на примере данного ученического проекта.
ТРИ В ОДНОМ или МАТЕМАТИКА + ФИЗИКА = ИНФОРМАТИКА
Наименование учреждения:
Государственное бюджетное образовательное учреждение города Москвы
средняя общеобразовательная школа № 167, г.Москва
Авторы проекта:
Стоянов Денислав Радославов, 7 г класс
Теплова Елизавета Максимовна, 7 в класс
Руководитель проекта:
Незнанов Сергей Александрович (nsa59@mail.ru)
Тезисы доклада:
Проблема исследования: наглядные примеры использования математических функций в математике, а также в компьютерном моделировании и физическом эксперименте.
Актуальность работы: заключается в практической значимости изучения математики, её применения в самых различных областях науки и техники, связь с другими учебными предметами.
Цель исследования: создать программу наглядного обучения математике и компьютерного моделирования физических процессов и явлений с использованием математических функций.
Основные выводы:
Разработана интересная обучающая компьютерная программа ТРИ В ОДНОМ или МАТЕМАТИКА + ФИЗИКА = ИНФОРМАТИКА, котораяпредназначена для изучения и отработки навыков работы с тригонометрическими функциями, с графиками на координатной плоскости, компьютерного моделирования и изучения механического движения.
Предназначена для учителей математики, информатики и физики и, соответственно, учащихся 7-х - 11-х классов при изучении тем "Тригонометрические функции", "Графики функций", "Системы счисления", "Моделирование", "Механическое движение" и т.д.
Отрабатываются навыки и умения работы с графиками функций, координатной плоскостью, отображаются значения функций и их графики, наглядно показано применение математических функций в компьютерном моделировании и физическом эксперименте. Отличная программа для ученика и учителя.
Программа не требует установки, состоит из одного файла, открытый программный код, возможность быстро доработать и внести изменения, совершенно бесплатна.
Представленный ряд тем по данным учебным предметам постоянно растёт и расширяется.
Решена задача создания простой и удобной компьютерной программы для изучения математических функций и их применения в различных учебных предметах. Учителя и учащиеся с удовольствием работают с программой, высказанные пожелания позволяют оперативно улучшить работу и интерфейс программы.
Практическая значимость: использование на уроках математики, информатики и физики при изучении данных учебных тем.
Рис. 1. Интерфейс программы (основное окно)
Компьютерный тренажёр «Координатная плоскость-2»
Выполнен в Visual Basic, скомпилирован в исполняемый файл.
Предоставлена возможность модификации и дальнейшего усовершенствования тренажёра. Представлен исходный программный код.
Цели и задачи:
Создание простой и удобной компьютерной программы для изучения и отработки навыков работы с координатной плоскостью и исполнителем алгоритмов – Чертёжником.
Тренировка и контроль учащихся в построении на плоскости точек и фигур по заданным координатам.
Тренировка и контроль учащихся в нахождении точек на координатной плоскости.
Развивать навыки и умения построения точек и фигур по их координатам, развивать логическое, математическое и пространственное мышление учащихся.
Для учителей математики и информатики.
Для учащихся начальных классов, 5-х и 6-х классов при изучении темы "Координатная плоскость ", " Метод координат ", темы "Исполнители алгоритмов".
Очень просто и легко отрабатываются навыки и умения работы с координатной плоскостью, быстро и наглядно происходит знакомство с её свойствами и назначением.
Отличный пример исполнителя алгоритмов – "Чертёжник".
Язык программирования Visual Basic позволяет быстро и наглядно решить вопросы создания и улучшения возможностей этой программы. Есть координатная плоскость с осями координат и координатной сеткой. Есть цифровая клавиатура для ввода координат точек с возможностью коррекции и очистки неверных значений, есть режимы точка или линия, есть возможность начать работу с программой заново, с нуля.
Программа не требует установки, состоит из одного файла, открытый программный код, возможность быстро доработать и внести изменения, совершенно бесплатна.
Решена задача создания простой и удобной компьютерной программы для изучения и отработки навыков работы с координатной плоскостью и исполнителем алгоритмов Чертёжником.
Учащиеся с удовольствием работают с программой, высказанные пожелания позволяют оперативно улучшить работу и интерфейс программы.
Рис. 2. Интерфейс программы (основное окно)
В наших примерах программные и аппаратные средства информатики позволили наглядно представить назначение и цели проекта, в котором раскрывается содержание тем других учебных предметов (математики и физики). Точно так же получается и с другими учебными предметами – средства информатики позволяют описать, просчитать, продемонстрировать, смоделировать, т.е. наглядно представить результаты этих проектов или исследований.
Таким образом, наш учебный предмет (информатика) необходим всем ученикам и другим учителям-предметникам.
Это даёт нам огромное стартовое преимущество при изучении информатики, так как все чувствуют и видят практическую значимость этого учебного предмета.
Одновременно на учителей информатики ложится большая ответственность за сохранение интереса к своему предмету, как учащихся, так и взрослых учителей-предметников. Это ежеминутная помощь и консультации в создании и демонстрации работ, исследований и проектов по всем учебным предметам. Добавим, что это происходит и в учебное время и после уроков.
Интерес к нашему предмету необходимо сохранять, поддерживать (а ещё лучше – увеличивать!) не только такой помощью, но и совместными разработками проектов и проведением исследований. Т.е. включение в проект материала для исследований или демонстрации из нескольких учебных предметов. Это позволит повысить интерес учащихся к изучаемым предметам, а проект будет более полным и практически значимым.
Напомню, что в современной науке наиболее значимые открытия и перспективы развития находятся как раз на стыке нескольких научных направлений. Например, математика и физика, физика и химия, биология, физика и математика и т.д.
Нам же, учителям информатики, необходимо постоянно поддерживать, развивать и углублять свои знания и умения в нашем современном и таком нужном предмете. Быть школьным «авангардом» для учеников и других учителей-предметников.
6 660 361 материал в базе
Настоящий материал опубликован пользователем Незнанов Сергей Александрович. Инфоурок является информационным посредником и предоставляет пользователям возможность размещать на сайте методические материалы. Всю ответственность за опубликованные материалы, содержащиеся в них сведения, а также за соблюдение авторских прав несут пользователи, загрузившие материал на сайт
Если Вы считаете, что материал нарушает авторские права либо по каким-то другим причинам должен быть удален с сайта, Вы можете оставить жалобу на материал.
Удалить материалВаша скидка на курсы
40%Курс профессиональной переподготовки
500/1000 ч.
Курс профессиональной переподготовки
500/1000 ч.
Курс повышения квалификации
36 ч. — 144 ч.
Курс повышения квалификации
36 ч. — 180 ч.
Мини-курс
10 ч.
Мини-курс
3 ч.
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.