新10 1-
508:仕様書無しさん / :
int getchar();int putchar(int);int main(){char k[]="A5D3A36D2A35B3F5B2A2A35B25"
"25B2A2A35B2525B2A2226D2A36C525B22E6D2A35B3B225B2A2A35B2525B2A2A35B2525B2A2226"
"D2A365B2",*p=k;int i,c,b=1;while(*p){c=0;for(i=0;i<8;i++){if(*p=='0'){if(!*++p
)break;b=!b;}c=(c<<1)+b;if((*p)--=='A')*p='0';if(*p>='A')b=!b;}if(c)putchar(c);
}getchar();return 0;}

ir ver 1.0 beta2.2 (03/10/22)