; ================================
; Машина Тьюринга
; Утроить последнюю букву слова
; Алфавит: a b c
; Пример: abc -> abccc
; ================================
; blank: _
; start: q0
; accept: qf
q0 a q0 a R
q0 b q0 b R
q0 c q0 c R
q0 _ q1 _ L
q1 a qa a R
q1 b qb b R
q1 c qc c R
qa _ qa1 a R
qb _ qb1 b R
qc _ qc1 c R
qa1 _ qa2 a R
qb1 _ qb2 b R
qc1 _ qc2 c R
qa2 _ qf a S
qb2 _ qf b S
qc2 _ qf c S