Выступление на МО учителей информатики
подборка задач для решения по теме алгоритм и его свойства в средней школы.
Знакомство с алгоритмами учащихся
происходит в начальной школе. В третьем классе учащиеся уже знают определение
алгоритма. Основные виды алгоритмических конструкций: линейная, циклическая и
ветвление. Также они знакомятся с системами программирования «Скрейтч» и
«Черепашка». Продолжение знакомства происходит в 6 классе. Учащиеся изучают
основные алгоритмические конструкции, знакомятся с различными способами записи
алгоритма. Интерес у учащихся вызывает работа над проектами по теме ветвления –
компьютер отгадывает одного из героев сказки репка. В зависимости от уровня подготовки
учащихся, можно сразу поставить перед учащимися задачу. Показать готовую
презентацию и дать задание на создание аналогичной по другой сказке. Можно
наоборот полностью разобрать задачу начиная с блок-схемы
Программы для черепашки или Скрейтч
Сброс
Повтори 5[
Вперёд 100
Направо 144
]
Сброс
Назад 100
Нов_ширина_пера 5
Вперёд 100
Направо 45
Вперёд 71
Направо 90
Вперёд 71
направо 45
вперёд 100
направо 90
вперёд 100
направо 135
вперёд 142
налево 135
вперёд 100
налево 135
вперед 142
сброс
повтори 5 [
вперёд 100
направо 120
]
Забор
Сброс
Нов_размер_холста
300,300
Нов_ширина_пера 4
Спрячь
Иди 10,280
Повтори 7[
Вперёд 100
Направо 45
Вперёд 28
Направо 90
Вперёд 28
Налево 45
Вперёд 100
Налево 180
]
Сброс
Нов_размер_холста
400,400
Повтори 3[
X = случайное
0,225
Y = случайное
0,225
Иди Х,У
Вперёд 100
Налево 135
Вперёд 48
Назад 48
Налево 90
Вперёд 48
Назад 48
Направо 45
Вперёд 40
Налево 45
Вперёд 48
Назад 48
Направо 90
Вперёд 48
Назад 48
Налево 45
Вперёд 60
Налево 180
]
Сброс
Повтори 180 [
Вперёд 1
Направо 1
]
Сброс
Повтори 360 [
Вперёд 1
Направо 1
]
Повтори 360 [
Вперёд 1
Налево 1
]
Бабочка
Сброс
Повтори360[
Вперёд1
Направо1
]
Повтори 360 [
Вперёд 1
Налево 1
]
Повтори 180 [
Вперёд 1
Направо 2
]
Повтори 180 [
Вперёд 1
Налево 2
]
Повтори 90 [
Вперёд 3
Направо 4
]
Повтори 90 [
Вперёд 3
Налево 4
]
Сброс
Нов_размер_холста
300,300
Имя = окно вопроса
«Сколько тебе лет»
Иди 0,10
Напиши «Ты
учишься»,имя-6, «классе»
Напиши «Ты
прожил», имя*365,25 «дней»
Сброс
Спрячь
Х = случайное 0,7
Если Х < 1 [иди
0,10
Напиши «любит» ]
Если (Х>1)и(X<2)
[ иди 0,20
Напиши «не любит»
]
Если (Х>2) и (X<3)
[
Иди 0,30
Напиши «плюнет»
]
Если (Х>3)и(Х<4)
[
иди 0,40
Напиши «поцелует»
]
Если (Х>4)и(Х<5)
[
иди 0,50
Напиши «к сердцу прижмёт»
]
Если
(Х>5)и(Х<6)
[
иди 0,60
Напиши «к черту
пошлет»
]
Если (Х>6)и(Х<7)
[
иди 0,70
Напиши «своей
нозовет»
]
Музыка для
Скрейтча гамма на 0,5 такта ноты 60,62, 64, 65, 67, 69, 71, 72 чижик – пыжик 64
0,25 60 0,25 64 0,25 60 0,25 65 0,25 64 0,25 62 0,5 67 0,25 67 0,25 67 0,25 69
0,125 71 0,125 60 0.25 60 0,25 60 0,5
Линейные
алгоритмы
Составить
алгоритм переводящий температуру в градусах Цельсия в температуру по Фаренгейту
и наоборот.
Dim C, F As
Integer
Sub Command1_Click()
C = InputBox(“Введи
температуру в градуса Цельсия”)
F = 32 +(F*9/5)
Print”Температура
в градусах Фаренгейта”;F
End Sub
Алгоритм
вычисляющий идеальный вес человека по формулам для женщины Вж = (Р*3 – 450+Л)*0,225
+40,5 для мужчины Вм = (Р*3 – 450+Л)/4 +45)
Dim V,L,V As
Single
Sub Command1_Click()
R = InputBox(“Введи рост в см”)
L = InputBox(“Введи возраст
в годах»)
V = (R*3-450+L)*0.225+40.5
End Sub
Строковые функции
и строковые переменные. Используя функции вырезки и склейки получить из слова
простоквашино слова сторона, росток, квас, ваш шар просто красота. Из слова
академия получить слова камея мидия диадема маяк
Из слова
железнодорожник получить слова дозор, железо, жезл, колено, крокодил
Составить слово алгоритм
из слов аттестат лимон гора
Составить слово
интеграл из слов интуиция градус лень
Разветвляющие
алгоритмы
Составьте
алгоритм, определяющий введенное число четное или нечетное, введенный год високосный
или не високосный
program sc;
var a : integer;
begin
readln(a);
if a mod 2 = 0
then writeln('четное')
else writeln('нечетное')
end.
program sc;
var a : integer;
begin
readln(a);
if a mod 4 = 0
then writeln('високосный')
else
writeln('невисокосный');
end.
Программа
здоровается с своим пользователем и спрашивает где пользователь, если введено
другое имя
Dim strA As String
Sub Command1_Click()
strA = InputBox(“Введите свое имя ”)
If strA = “Вася”Then Print”Здравствуй Вася”else Print”А где Вася?”
End Sub
В компьютер
вводится число от 1 до 100, программа соотносит числительное с существительным
ворона
A = InputBox(“”)
B = A Mjd 10
If A = 0 Or
A>=5And A<=20 Or B>=5 Or B =0 Then Print A;”ворон”
Else
If B >=2 And B
<=4 Then Print A;“вороны”
Else
Print A;”ворона”
End If
End If
Составить алгоритм,
заменив слово ворона на рубль овец, подсчитывающий количество лет.
Команда
выбора
Dim N As Byte
Private Sub
Command1_Click()
A =
InputBox("Скажи что нибуть Эллочки")
N = Int(Rnd(1) *
5) + 1
Select Case N
Case 1
Print "Красота"
Case 2
Print "Не
учите меня жить"
Case 3
Print "Мрак"
Case 4
Print "Хамите"
Case 5
Print "Ты
толстый красивый парниша"
Case 6
Print "Ого"
Case Else
Print "Жуть"
End Select
End Sub
Циклические алгоритмы
Графика в
циклических алгоритмах
Dim strA, strB, strX As String
strA = InputBox(“Введите слово”)
strX = “”
For I = 1To Len(strX)
strB = Mid(strA,I,1)
strX = strB +strX
Next
Print”Слово перевертыш”;strX
End Sub
Dim N, S, i As Integer
Private Sub Command1_Click()
N = Int(Rnd(1) * 100) + 1
S = 0
D:
i = InputBox("Угадай
число которое я задумала")
Do While i <> N
If i > N Then Print
"мговато будет"
S = S + 1
GoTo D
If i < N Then Print
"маловато будет"
S = S
+ 1
GoTo D
Loop
Print "число угадано потрачено
попыток"; S
End Sub
Private Sub Command1_Click()
P = 4 * Atn(1)
N = InputBox("число
сторон")
R = 3000
PSet (7000 + R * Sin(2 * P / N),
5000 + R * Cos(2 * P / N)), vbRed
For I = 0 To 2 * P Step 2 * P / N
X = 7000 + R * Sin(I)
Y = 5000 + R * Cos(I)
Line -(X, Y), vbRed
Next
End Sub
Звезды
Private Sub Command1_Click()
P = 4 * Atn(1)
N = InputBox("количество
зубцов")
R = 3000
For I = 0 To 2 * P Step 2 * P / N
PSet (7000 + R * Sin(I), 4000 + R *
Cos(I)), vbRed
X = 7000 + R * Sin(I)
Y = 4000 + R * Cos(I)
Line -(X, Y), vbRed
X1 = 7000 + R * Sin(I + P * 4 / 5)
Y1 = 4000 + R * Cos(I + P * 4 / 5)
Line -(X1, Y1), vbRed
Next
End Sub
Одномерные массивы
Памятка для решения задач
название
|
Сумма элементов массива
|
Произведение элементов
массива
|
Максимум элемент массива
|
Минимум элемент массива
|
Количество элементов
массива
|
Поиск порядкового элемента
равного 7
|
Команда до цикла
|
S = 0
|
P = 1
|
Max=A(1)
|
Min=A(1)
|
K = 0
|
K = 0
|
Команда в цикле
|
S = S
+ A(I)
Если нужно найти сумму
только положительных то в цикле должно быть If
A(I)>0 Then S
= S + A(I)
|
P = P
*A(I) Если нужно найти произведение
только отрицательных то в цикле должно быть If
A(I)<0 Then Р = Р*A(I)
|
If A(I)>Max Then Max = A(I)
|
If A(I)<Min Then Min = A(I)
|
К = К+1 Если нужно найти
количество только нулевых то в цикле должно быть If A(I)=0 Then К = К + 1
|
If A(I) = 7 Then К =I
|
Оставьте свой комментарий
Авторизуйтесь, чтобы задавать вопросы.