Prog#145: fortran to pascal conversion

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