s = 19107012
L = s Mod 10
T = s Mod 100
k = s Mod 10000

I = T

A = 5 * 10 ^ (-2)

C = I / A ^ 2

A = 10 * 10 ^ (-2)

I = C * A ^ 2
MsgBox I

I = 100
A = Sqr(I / C)
MsgBox A