Сметана011

10.02.2021 09:39 •  Другие предметы

Написать программу на языке смол бесик
motors = "AB" 'определяем моторы
Sensor.SetMode(1,0) 'инициализируем гироскоп на порту 1
four()'подпрограмма которая рисует четверку, тут она вызывается
two()'подпрограмма которая рисует двойку, тут она вызывается
four()'подпрограмма которая рисует четверку, тут она вызывается

Program.End() 'конец основной программы

'подпрограмма, которая рисует 4 ку
Sub four
Rasstoyanie = 20 'едем вперед на 20 см
ride()
Rasstoyanie = -10 'едем назад на 10 см
ride()
angle = -90 ' повораиваемся против часовой стрелки на 20 градусов
twist()
Rasstoyanie = 10 'едем 10 см
ride()
angle = 0 ' повораиваемся против по часовой стрелке на 90 градусов так как мы уже повернули на -90, то едем обратно до 0
twist()
Rasstoyanie = 10 'едем 10 см
ride()