Рядовой
Сообщений всего: 5
Дата рег-ции: Нояб. 2010
|
переменная I
переменная R
переменная U
перо 2
спрятать черепаху
СТАРТ:
ручка 10
пиши 300, 200 ,"< Электрическая цепь >"
пиши "Ввод исходных данных U, R:"
спроси "Напряжение U = ", U
спроси "Сопротивление R= ", R
если R = 0 то R = 0.01
'******************
Домой
поднять перо
Место 300, 500
цвет 12
вперед 150
опустить перо
круг 10
вперед 50
направо 90
вперед 100
круг 2
налево 45
вперед 20
назад 20
направо 45
цвет 0
вперед 20
цвет 9
круг 2
вперед 100
направо 90
вперед 50
поднять перо
вперед 50
опустить перо
перо 4
цвет 8
круг 50
направо 45
вперед 50
назад 100
вперед 50
направо 90
вперед 50
назад 100
вперед 50
налево 135
перо 2
цвет 9
поднять перо
вперед 50
опустить перо
вперед 50
направо 90
вперед 220
направо 90
вперед 50
круг 10
ручка 12
пиши 320, 400 ,"U = " + U + " Вольт"
ручка 14
пиши 580, 400 ,"R = " + R + " Ом"
I = U / R
ручка 11
пиши "Ответ :"
пиши "I = U / R =" + U + "/" + R + "=" + I + " Ампер"
пиши "---------------------------------------"
ручка 13
пиши 250, 550 ,"Нажми стрелку вниз или вверх - Вкл./Выкл."
ручка 12
пиши 320, 340 ,"+"
ручка 9
пиши 320, 440 ,"-"
СТОП:
событие нажата клавиша 38
Домой
поднять перо
Место 400, 300
направо 90
опустить перо
цвет 12
круг 2
налево 45
вперед 20
назад 20
направо 45
цвет 0
вперед 20
цвет 9
круг 2
вперед 100
направо 90
вперед 50
поднять перо
вперед 50
опустить перо
перо 4
цвет 8
круг 50
направо 45
вперед 50
назад 100
вперед 50
направо 90
вперед 50
назад 100
вперед 50
налево 135
перо 2
ручка 0
пиши 400,250,"--> I"
конец события
событие нажата клавиша 40
Домой
поднять перо
Место 400, 300
направо 90
опустить перо
цвет 12
круг 2
налево 45
цвет 0
вперед 20
назад 20
направо 45
цвет 12
вперед 20
круг 2
вперед 100
направо 90
вперед 50
поднять перо
вперед 50
опустить перо
перо 4
цвет 14
круг 50
направо 45
вперед 50
назад 100
вперед 50
направо 90
вперед 50
назад 100
вперед 50
налево 135
перо 2
ручка 11
пиши 400,250,"--> I"
конец события |
Описание: Пример использование LOGO для расчета закона Ома
