結果

問題 No.1071 ベホマラー
コンテスト
ユーザー tails
提出日時 2023-03-07 13:57:10
言語 C90
(gcc 12.3.0)
結果
AC  
実行時間 4 ms / 2,000 ms
コード長 1,162 bytes
コンパイル時間 783 ms
コンパイル使用メモリ 26,112 KB
実行使用メモリ 6,944 KB
最終ジャッジ日時 2024-09-18 02:08:14
合計ジャッジ時間 1,671 ms
ジャッジサーバーID
（参考情報） 		judge6 / judge4
このコードへのチャレンジ
（要ログイン）
ファイルパターン 結果
sample AC * 5
other AC * 20
権限があれば一括ダウンロードができます
コンパイルメッセージ
main.c: In function ‘main’:
main.c:7:59: warning: implicit declaration of function ‘write’ [-Wimplicit-function-declaration]
    7 | #define wt1(v) ({char wbuf[64],*wp=wbuf+sizeof wbuf;wt(v);write(1,wp,wbuf+sizeof wbuf-wp);})
      |                                                           ^~~~~
main.c:58:9: note: in expansion of macro ‘wt1’
   58 |         wt1(z*x+(b?(a[b-1]+k-2)/k*(y-(ulong)x*(n-b)):0));
      |         ^~~
main.c:59:9: warning: implicit declaration of function ‘_exit’ [-Wimplicit-function-declaration]
   59 |         _exit(0);
      |         ^~~~~
main.c:59:9: warning: incompatible implicit declaration of built-in function ‘_exit’ [-Wbuiltin-declaration-mismatch]

ソースコード

diff # 

#pragma GCC optimize("Ofast")
#pragma GCC target("avx2")

#define getrp() ({char*mmap();mmap(0l,1l<<25,1,2,0,0ll);})
#define rd() ({int _v=0,_c;while(_c=*rp++-48,_c>=0)_v=_v*10+_c;_v;})
#define wt(v) ({ulong _z=v;do*--wp=_z%10+48;while(_z/=10);})
#define wt1(v) ({char wbuf[64],*wp=wbuf+sizeof wbuf;wt(v);write(1,wp,wbuf+sizeof wbuf-wp);})
#define rep(v,e) for(typeof(e) v=0;v<e;++v)
#define rep3(v,s,e) for(typeof(e) v=s;v<e;++v)
#define max(a,b) (a>=b?a:b)

typedef unsigned long ulong;

void sort_aux(unsigned*a,unsigned*b,int n){
	int c[256];
	for(int i=0;i<256;++i){
		c[i]=0;
	}
	for(int i=0;i<n;++i){
		++c[a[i]&255];
	}
	int t=0;
	for(int i=0;i<256;++i){
		int u=c[i];
		c[i]=t;
		t+=u;
	}
	for(int i=0;i<n;++i){
		b[c[a[i]&255]++]=a[i]>>8|a[i]<<24;
	}
}

void sort(unsigned*a,int n){
	unsigned*b=a+n;
	sort_aux(a,b,n);
	sort_aux(b,a,n);
	sort_aux(a,b,n);
	sort_aux(b,a,n);
}

unsigned a[100000*2];

int main(){
	char*rp=getrp();
	int n=rd();
	int k=rd();
	int x=rd();
	int y=rd();
	rep(i,n){
		a[i]=rd();
	}
	sort(a,n);
	int b=max(0,n-y/x);
	ulong z=0;
	rep3(i,b,n){
		z+=(a[i]+k-2)/k;
	}
	wt1(z*x+(b?(a[b-1]+k-2)/k*(y-(ulong)x*(n-b)):0));
	_exit(0);
}
0