Basic pascal c