Problem:
MathJax.Hub.Config({ tex2jax: { inlineMath: [["$","$"], ["\\(","\\)"]], processEscapes: true }});

踏み台昇降

JAG大学に通う一樹君，通称カー君は，この夏友達であるあなたに誘われて，ICPC (International Collegiate Potchari Contest) に出場することになった．
ICPCは，スポーツ系のコンテストであり，高度な運動能力が必要とされる．
しかし，カー君はいつもパソコンの前にいてばかりで，少し動くだけでも疲れてしまうほどに運動不足だった．
そこでカー君は，ICPCでいい成績を残すための第1ステップとして，手軽に始められる運動，「踏み台昇降」を始めることにした．

踏み台昇降とは，その名の通り，踏み台と床との上り下りをただひたすら繰り返すだけの単純な運動である．
ただし，踏み台昇降では，正しい足の昇降を行わなければ，その効果を得ることはできない．
正しい昇降とは，以下の2種類の内いずれかを満たす足の動きである．

両足が床についた状態から，左足と右足を踏み台の上に上げて，踏み台の上に両足ともついた状態になる．左足と右足どちらを先に上げてもよい．

踏み台の上に両足ともついた状態から，左足と右足を床に下げて，両足が床についた状態になる．左足と右足どちらを先に下げてもよい．

以上からわかるように，床または踏み台の上にいる状態から連続で片足だけを上げ下げしても，正しい昇降とはならない．
踏み台昇降運動では，上記の正しい昇降の動きのいずれかを満たすとき，1回とカウントし，そのカウント数が大きければ大きいほど，効果を得ることができる．
床と踏み台を往復しなくても，片道だけで1回とカウントすることに注意してほしい．

あなたは，チームメイトであるカー君に少しでも強くなってほしいと考えている．
そこであなたは，カー君が踏み台昇降をさぼっていないか，プログラムを書いてチェックしてあげることにした．
カー君が踏み台昇降で動かした足の情報が与えられるので，正しく昇降を行った回数を求めよ．
ただし，両足とも床についている状態から踏み台昇降を始めるものとする．

Input

入力は，複数のデータセットから構成され，1つの入力に含まれるデータセットの数は150以下である．
各データセットの形式は次の通りである．

$n$
$f_1$ $f_2$ ... $f_n$

1行目で，足を動かした回数を表す整数 $n$ ($1 \le n \le 100$) が与えられる．
2行目で，足の動作を表す文字列である $f_i$ が時系列順に $n$ 個，スペース区切りで与えられる．
$f_i$ は，以下の4種類の文字列の内いずれかである．

"lu" : 左足を踏み台へ上げる．

"ru" : 右足を踏み台へ上げる．

"ld" : 左足を床へ下げる．

"rd" : 右足を床へ下げる．

床についている足をさらに下げるような動作や，踏み台についている足をさらに上げるような動作は入力されないと仮定してよい．

$n$ が0の行は入力の終わりを表す．このデータについては処理を行ってはならない．

Output

各データセットに対して，1行で正しい踏み台昇降を行った回数を出力せよ．
各行の終わりに改行を出力しない場合や，不必要な文字を出力する場合，誤答と判断されてしまうため注意すること．

Sample Input

4
lu ru ld rd
4
lu ld lu ru
1
lu
10
ru lu ld rd ru rd ru lu rd ld
0

Output for Sample Input

2
1
0
4

Solution in Ruby (judge verdict: Accepted)

input_data = gets.chomp
n = input_data.to_i

while n != 0 do 
    upflug = false
    count = 0
    #初めの状態、両足が地面についている。
    preL = 'ld'
    preR = 'rd'
    #splitは配列になってします。
    g = gets.chomp.split(" ")
    n.times do |i|
        
        if upflug && g[i] == 'ld' && preR == 'rd'
            count += 1
            upflug = false
        end
    
        if upflug  && g[i] == 'rd' && preL == 'ld'
            count += 1
            upflug = false
        end
    
        if !upflug && g[i] == 'lu' && preR == 'ru'
            count += 1
            upflug = true
        end
    
        if !upflug && g[i] == 'ru' && preL == 'lu'
            count += 1
            upflug = true
        end
    
        if g[i] == 'lu' || g[i] == 'ld'
            preL = g[i]
        end
        if g[i] == 'ru' || g[i] == 'rd'
            preR = g[i]
        end
    end
    p count
    input_data = gets.chomp
    n = input_data.to_i 
end