FIRESC run time error help

can someone suggest tom what is the problem with my solution or give an example that makes my code wrong, thanks .