fork download
copy 
  1. #include<stdio.h>
  2. #include<string.h>
  3. main()
  4. {
  5. char a[20],b[20],c,d;
  6. FILE*fs,fp;
  7. fs=fopen("Head.txt","r");
  8. fp=fopen("add.c","r");
  9. while(feof!(fp))
  10. {
  11. c=fgetc(fp)
  12. ass=toasscii(c);
  13. if((ass>=97)&&(ass<=122))
  14. {
  15. a[0]=c;
  16. f=1;
  17. i=1;
  18. }
  19. while(f==1){
  20. d=fgetc(fp)
  21. ass=toascii(d);
  22. if((ass>=97)&&(ass<=122)||(ass==46))
  23. {
  24. a[i]=d;
  25. f=1;
  26. I=i+1;
  27. }
  28. else{
  29. f=0;
  30. a[i]=\0
  31. fseek(fp,-1,1)
  32. break;
  33. }}
  34. while(feof(fs)!)
  35. {
  36. fscanf(fs"%s",b)
  37. Z=strcmp(a,b);
  38. if(z==0){
  39. Printf("%s Is constant");
  40. }
  41. }
  42.  
Success #stdin #stdout #stderr 0.04s 6864KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Standard output is empty
stderr
copy 
ERROR: /home/c29mFW/prog:41:1: Syntax error: end_of_file_in_quasi_quotation
ERROR: '$runtoplevel'/0: Undefined procedure: program/0
   Exception: (3) program ? EOF: exit
https://ideone.com/94agsF
language:
Prolog (swi 7.6.4)
created:
2 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!