prev


Character Arrays - String manipulations:

89.Convert from fortan to pascal (13.05.2010)

/*
Program# 89
date : 29-12-2008
Convert Fortran into pascal
*/

#include <stdio.h>
main(){
char a[100],b[100];
int i,j;

i=0;
scanf("%c",&a[i]);
while(a[i]!='$'){
i++;
scanf("%c",&a[i]);
}
a[i]='\0';

i=0;j=0;
while(a[i]!='\0'){
if(a[i]=='=')
b[j++]=':';
if(a[i]=='\n')
b[j++]=';';

b[j]=a[i];
j++;
i++;
}
b[j]='\0';
printf("\n %s\n %s",a,b);
}



next
blog comments powered by Disqus