Prog#146: pascal to fortran

C Programming
#1 
/*
pascal to fortran
Program#146
*/
#include<stdio.h>
main()
{
int i,j;
char a[50], b[50];
for(i=0;(a[i]=getchar())!='$';i++);
a[i]='\0';
j=0;
for(i=0;a[i];i++);
{
if(a[i]!=':'***a[i]!='\n')
{
b[j]=a[i];
j++;
}
}
b[j]='\0';
puts (b);
}