結果

問題 No.955 ax^2+bx+c=0
ユーザー cielciel
提出日時 2020-02-23 10:58:43
言語 C90
(gcc 11.4.0)
結果
CE  
(最新)
AC  
(最初)
実行時間 -
コード長 1,307 bytes
コンパイル時間 255 ms
コンパイル使用メモリ 24,192 KB
最終ジャッジ日時 2024-06-26 03:16:14
合計ジャッジ時間 1,197 ms
ジャッジサーバーID
（参考情報） 		judge4 / judge5
このコードへのチャレンジ
（要ログイン）
コンパイルエラー時のメッセージ・ソースコードは、提出者また管理者しか表示できないようにしております。（リジャッジ後のコンパイルエラーは公開されます）
ただし、clay言語の場合は開発者のデバッグのため、公開されます。

コンパイルメッセージ
main.c: In function ‘main’:
main.c:27:17: warning: ignoring return value of ‘scanf’ declared with attribute ‘warn_unused_result’ [-Wunused-result]
   27 |                 scanf("%lld%lld%lld",&a,&b,&c);
      |                 ^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/usr/bin/ld: /tmp/ccktRC5C.o: in function `main':
main.c:(.text.startup+0x29): undefined reference to `__libc_dlopen_mode'
/usr/bin/ld: main.c:(.text.startup+0x3b): undefined reference to `__libc_dlsym'
/usr/bin/ld: main.c:(.text.startup+0x51): undefined reference to `__libc_dlsym'
collect2: error: ld returned 1 exit status

ソースコード

diff # 

#include <stdio.h>
#include <quadmath.h>

void* __libc_dlopen_mode(const char *x,int y);
void* __libc_dlsym(void *x,const char *y);
int   __libc_dlclose(void *x);
#define LoadLibraryA(s) __libc_dlopen_mode(s,2)
#define GetProcAddress __libc_dlsym
#define FreeLibrary __libc_dlclose

typedef __float128 (*type_sqrtq)(__float128);
typedef int (*type_quadmath_snprintf)(char *s, size_t size, const char *format, ...);
type_sqrtq mysqrtq;
type_quadmath_snprintf myquadmath_snprintf;

char buf[99];
int main(){
	//void *H=LoadLibraryA("/usr/local/lib/gcc/9/libquadmath.dylib");
	void *H=LoadLibraryA("/usr/lib64/libquadmath.so");
	mysqrtq=(type_sqrtq)GetProcAddress(H,"sqrtq");
	myquadmath_snprintf=(type_quadmath_snprintf)GetProcAddress(H,"quadmath_snprintf");

	int T;
	long long a,b,c;
	__float128 d;
	//for(scanf("%d",&T);T--;){
		scanf("%lld%lld%lld",&a,&b,&c);
		if(!a){
			if(!b)puts(c?"0":"-1");
			else printf("1\n%.12Lf\n",-c*1.0L/b);
		}else{
			if(a<0)a=-a,b=-b,c=-c;
			__float128 _a=a,_b=b,_c=c;
			d=_b*_b-4.0Q*_a*_c;
			if(d<0)puts("0");
			else if(d==0)printf("1\n%.12Lf\n",-b/2.0L/a);
			else{
				puts("2");
				myquadmath_snprintf(buf,99,"%.12Qf",(-_b-mysqrtq(d))/2/_a);
				puts(buf);
				myquadmath_snprintf(buf,99,"%.12Qf",(-_b+mysqrtq(d))/2/_a);
				puts(buf);
			}
		}
	//}
	return 0;
}
0