結果

問題 No.3020 ユークリッドの互除法・改
コンテスト
ユーザー ジュ・ビオレ・グレイス
提出日時 2025-02-10 20:14:11
言語 D
(dmd 2.109.1)
結果
AC  
実行時間 1 ms / 2,000 ms
コード長 524 bytes
コンパイル時間 3,110 ms
コンパイル使用メモリ 88,192 KB
実行使用メモリ 5,248 KB
最終ジャッジ日時 2025-02-10 20:14:15
合計ジャッジ時間 1,657 ms
ジャッジサーバーID
（参考情報） 		judge3 / judge1
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 3
other AC * 21
権限があれば一括ダウンロードができます

ソースコード

diff # 

import std.algorithm, std.array, std.conv, std.math, std.range, std.stdio, std.typecons;

long gcd2(long a, long b) {
	if (b == 0) return a.abs();
	else return gcd2(b, a%b);
}
long gcd(long a, long[] b ...) {
	if (b.empty) return a;
	return gcd( gcd2(a, b[0]), b[1 .. $] ); 
}

void main() {
	auto row1 = readln.split.to!(long[]);
	auto row2 = readln.split.to!(long[]);
	auto g = gcd(row1[0], row1[1], row2[0], row2[1]);
	if (g == 0) writeln("0 0");
	else writeln(g, " ", ( row1[0]*row2[1] - row2[0]*row1[1] ).abs() / g );
}
0