• Pascal

function Trail(n: Integer): Integer;
var
  Mask: Integer;
begin
  T := 0;
  while (T < SizeOf(Integer)*8) do
  begin
    Mask := 1 shl T;
    if (n and Mask) <> 0 then Exit;
    Inc(T);
  end;
end;

begin
  writeln(Trail(112),' (should be 4)');
end.

• C

int t = -1;
if (n)
        while (! (n & 1<<++t));
else
        t = 8*sizeof(n);

• C#

var t = Convert.ToString(n, 2)
    .Reverse()
    .TakeWhile(i => i == '0')
    .Count();

• C#

int t = 0;

if(n != 0)
{
    while((n & 1) == 0)
    {
        t++;
        n >>= 1;
    }
}
else
{
    t = 8 * sizeof(int);
}

• Dart

t = n.bitLength - 1 - n.toRadixString(2).lastIndexOf('1');

• Dart

t = n.toRadixString(2)
	.split('')
	.reversed
	.takeWhile((e) => e == '0')
	.length;

• Dart

var t = 0;
while (n.isEven && n != 0) {
  t++;
  n = n >> 1;
}

• Erlang

trailingZeros(Num) ->
        trailingZeros(Num, 0).

trailingZeros(Num, Count) when Num band 1 == 0 ->
        trailingZeros(Num div 2, Count + 1);
trailingZeros(_, Count) -> Count.

• Fortran

t = trailz(n)

• Go

t := bits.TrailingZeros(n)

• Java

String p = ".+?(?<!0)(?=0+)",
       s = toBinaryString(n);
int t = s.replaceAll(p, "").length();

• Java

int t = numberOfTrailingZeros(n);

• Java

String b = toBinaryString(n);
int i = b.lastIndexOf('1'), t;
t = i == -1 ? 0 : b.substring(++i).length();

• Perl

$s = sprintf '%b', $n; 
$n = length $s; 
$t++ while !substr($s, --$n, 1) && $n >= 0; 

• Perl

$t = sprintf('%b', $n) =~ /(0+)$/ ? length($1) : 0;

• Python

t = bin(n)[::-1].find('1')

• Python

b = len(s := format(n, 'b'))
t = b - len(s.rstrip('0'))

• Ruby

t = n.digits(2).index(1)

• Rust

let t = n.trailing_zeros();