fork download

#include<stdio.h>
#include<math.h>
int main()
{
int t;
long c,n,f=1;
scanf("%d",&t);
while(t--)
{
 scanf("%ld",&n);
 if(n==0) 
	printf("%ld\n",f);
 else
 {
  c=n*log10(n) - n/(log(10)) + (log10f((2*22*n)/7))/2;
  printf("%ld\n",c+1);
 }
}
return 0;
}
 

gnatgcc -c -pipe -O2 prog.adb
prog.adb:1:01: illegal character
prog.adb:2:01: illegal character
prog.adb:4:01: illegal character, replaced by "("
prog.adb:9:01: illegal character, replaced by "("
prog.adb:11:06: == should be =
prog.adb:14:02: illegal character, replaced by "("
prog.adb:17:02: illegal character, replaced by ")"
prog.adb:18:01: illegal character, replaced by ")"
prog.adb:20:01: illegal character, replaced by ")"
gnatmake: "prog.adb" compilation error

Standard output is empty