Завершает этот выпуск триада программ для МК-85 (на языке БЕЙСИК), присланная нам из
подмосковного поселка Болшево профессиональным программистом Забегаевой Т.Л. Приво-
дим письмо, сопровождающее программы, практически полностью:
"Недавно мы купили микрокомпьютер МК-85. У нас в семье есть дети и, естественно, они
не могли остаться в стороне от этого события.
Известно, что если дети младшего школьного возраста пользуются для вычислений мик-
рокалькулятором, то у них не вырабатываются навыки учетного счета. А МК-85 может предо-
ставить большие возможности как раз для приобретения и развития этих навыков. Хочу поде-
литься с вами моим, пока еще очень небольшим, опытом в этом направлении.
Сначала я составила программу для девятилетнего сына на повторение таблицы умноже-
ния. Эта программа выдает на индикатор пример на умножение или деление. Нужно ввести
цифры ответа и нажать клавишу ЕХЕ. Если ответ правильный, на индикаторе высвечивается
слово "Правильно" и после нажатия на клавишу ЕХЕ предлагается новый пример. Если же от-
вет был дан неверный, то высвечивается слово "Неправильно", а на индикаторе после нажатия
на клавишу ЕХЕ повторяется этот же пример.
Для младшего сына, которому четыре с половиной года, я составила аналогичную про-
грамму на сложение и вычитание однозначных чисел. Сыну эта игра (а он воспринимает это
занятие как игру) очень понравилась. За какие-то неделю-две он научился довольно уверенно
оперировать числами в пределах 20.
Когда интерес у детей к игре с этими программами начал ослабевать, мы стали решать на
скорость: ставилась задача сосчитать за одну минуту как можно больше примеров. Личный
рекорд постепенно с развитием навыка устного счета возрастает, и это, в свою очередь, явля-
ется стимулом к дальнейшим занятиям. Еще хочу предложить вашему вниманию игровую про-
грамму "Угадай число". Эта программа взята из книги "Домашний компьютер", авторы Р. Ло-
берг и Т. Лутц (М.: Детская литература, 1990), и интерпретирована мной для МК-85. За семь
попыток нужно угадать число, лежащее в интервале от 0 до 100. На каждую попытку на инди-
каторе дается направляющий ответ "Много", "Мало" или, в случае правильного ответа, "Ты
угадал".
Нахождение ответа в этой программе можно усложнить, предложив поиск числа в интерва-
ле от 0 до 1000. Для этого достаточно в операторе под меткой 20 функцию PAN# умножить
не на 100, а на 1000. При этом целесообразно количество попыток увеличить до 10".
Советуем обратить на эти программы особое внимание, так как они оптимальны социаль-
но. При минимуме усилий, затрат оборудования и профессиональных навыков, получен стой-
кий и красивый результат. Все это естественно вписывается в рамки нашей темы и рубрики
(см.текущие выпуски). Без высоких инстанций, без излишней навязчивости сей полезный опыт
может быть перенесен во многие квартиры, где есть дети и уже есть МК-85.
Программа "Сосчитай"
Автор: Забегаева Т.А. Реализована на МК-85
Программа "СОСЧИТАЙ" предназначена для развития навыков устного счета у детей до-
школьного и младшего школьного возраста. Программа предлагает примеры на сложение и
вычитание чисел в пределах 20 и использует функцию генерации случайного числа RAN#, ко-
торая дает число, лежащее в интервале от 0 до 1. Умножив это число на 10 и выделив целую
часть, получаем случайное однозначное число.
Примеры, предлагаемые программой "СОСЧИТАЙ", можно усложнить, распространив их
на сложение и вычитание двузначных чисел. Для этого достаточно в операторах 10 и 15 функ-
цию RAN# при определении переменных А и В умножать не на 10, а на 100.
5 PRINT "СОСЧИТАЙ" 60 IF G = С THEN 80
10 А = INT(RAN#*10):B = INT(RAN#*10) 70 PRINT "Неправильно": GOTO 40
15 D = INT(RAN#'№) 80 PRINT "Правильно": GOTO 10
20 С = A + В 90 PRINT C; "-"; A; " = ";
30 IF D>4 THEN 90 100 CSR 9: INPUT G
40 PRINT A; " + "; B; " = "; 110 IF G = В THEN 80
50 CSR 8:INPUT G 120 PRINT "Неправильно": GOTO 90
После запуска программы на индикаторе высвечивается случайный пример на сложение и
вычитание. Требуется ввести цифры ответа и нажать клавишу ЕХЕ. Если ответ правильный, на
индикаторе загорается слово "Правильно" и, после нажатия на клавишу ЕХЕ, предлагается но-
вый пример. Если ответ был дан неверный, то загорается слово "Неправильно", и на индикато-
ре повторяется этот же пример.
Количество переменных 5;
Количество шагов 178.
Программа "Таблица умножения"
Автор: Забегаева Т.А. Реализована на МК-85.
Программа "ТАБЛИЦА УМНОЖЕНИЯ" предназначена для повторения в игровой форме
таблицы умножения детьми младшего школьного возраста. Программа предлагает примеры
на умножение однозначных чисел и использует функцию генерации случайного числа RAN",
которая дает число, лежащее в интервале от 0 до 1. Умножив это число на 10 и выделив це-
лую часть, получаем случайное однозначеное число.
5 PRINT "ТАБЛИЦА УМНОЖЕНИЯ"
10 А = INT(RAN#*10): В = INT(RAN#*10)
1$ D = INT(RAN#*10)
20 IF А = 0 THEN 140
30 С = А*В
40 IF D>4 THEN 100
50 PRINT A; "*";B;" = ";
60 CSR 6: INPUT G
70 IF G = С THEN 90
80 PRINT "Неправильно"; GOTO 50
90 PRINT "Правильно" GOTO 10
100 PRINT C; ":"; A; " = ";
110 CSR 7: INPUT G
120 IF G = В THEN 90
130 PRINT "Неправильно": GOTO 100
140 A = 5: GOTO 30
После запуска программы на индикаторе высвечивается случайный пример из таблицы ум-
ножения. Требуется ввести цифры ответа и нажать клавишу ЕХЕ. Если ответ правильный, то на
индикаторе загорается слово "Правильно" и, после нажатия на клавишу ЕХЕ, предлагается но-
вый пример на умножение или деление. Если ответ был неверный, то загорается слово "Не-
правильно" и на индикаторе повторяется этот же пример.
Количество переменных 5;
Количество шагов 202.
Программа "Угадай число"
Автор: Забегаева Т.А. Реализована на МК-85.
Программа "УГАДАЙ ЧИСЛО" — игровая и представляет адаптированный для МК-85 вари-
ант из книги Р.Лоберг, Т.Лутц "Домашний компьютер". За семь попыток, используя направля-
ющие ответы, требуется угадать число, лежащее в интервале от 0 до 100.
10 PRINT "УГАДАЙ ЧИСЛО"
20 Т = 0: N = INT(RAN#'100)
30Т = Т + 1
40 IF Т = 8 THEN 120
50 PRINT "П"; Т;
60 CSR 7: INPUT G
70 IF G s N THEN 110
80 IF G>N THEN 100
90 PRINT G; "Мало": GOTO 30
100 PRINT G; "Много": GOTO 30
110 PRINT "Ты угадал": GOTO 140
120 PRINT "Все попытки исчерпаны,";
130 PRINT "а число было"; N
140 PRINT "Сыграем еще?": GOTO 20
Количество переменных 3;
Количество шагов 234.
ИНВЕСТСЕРВИС
Вы хотите иметь надежный многотерми-
нальный комплекс и у вас нет валюты — об-
ращайтесь во Львовское МП "Инвестсервис"!
В сжатые сроки (максимум три недели) за РУБЛИ, по доступ-
ным ценам, с высоким качеством мы поставим, внедрим и адап-
тируем многотерминальный комплекс КРАБ.
Комплекс позволяет создать четыре дополнительных рабочих
места, оснащенных персональной ЭВМ типа PC XT/AT.
Многотерминальный комплекс имеет программную поддерж-
ку, обеспечивающую одновременную работу нескольких поль-
зователей в среде MS DOS.
Большую часть программного обеспечения, разработанного
для PC XT/AT, можно эксплуатировать на комплексе без каких-
либо доработок.
Многотерминальный комплекс особенно эффективен в прило-
жениях, требующих ввода больших массивов данных при отно-
сительно небольшом объеме вычислений.
Применение многотерминального комплек-
са КРАБ на складах, в регистратурах поликли-
ник, библиотеках, учебных заведениях чрез-
вычайно выгодно, так как он заменяет несколько дорогостоя-
щих компьютеров. Возможно подключение принтеров.
КОМПЛЕКТ ПОСТАВКИ:
- четыре терминала;
- плата расширения, устанавливаемая в ПЭВМ;
- кабели подключения;
. базовое программное обеспечение.
По желанию заказчика в комплект
могут быть включены:
- импортная персональная ЭВМ;
- пакеты отладочных кросс-средств практически для
любых микропроцессоров и однокристальных ЭВМ.
Обращаться по адресу:
290044, Львов-44, а/я 8863
МП "Инвестсервис"
Справки по телефонам:
35-35-79, 34-32-12 с 8 до 17 часов;
34-29-42 с 18 до 7 часов.
