/programy/Robsim/Robiada2007/sumo_kakl.lab |
---|
0,0 → 1,37 |
program sumo_kakl; |
var i; |
var ble; |
LMOT := 30; |
RMOT := -30; |
ble:=0; |
while ble<25 do ble:=ble+1; end; |
LMOT := 30; |
RMOT := 30; |
ble:=0; |
while ble<100 do ble:=ble+1; end; |
LMOT := 30; |
RMOT := -30; |
while true |
do |
if LEYE < 0 then |
LMOT := -30; |
RMOT := -30; |
ble:=0; |
while ble<100 do ble:=ble+1; end; |
continue; |
end; |
if REYE < 0 then |
RMOT := -30; |
LMOT := -30; |
ble:=0; |
while ble<100 do ble:=ble+1; end; |
continue; |
end; |
end; |