|
最適化等を一切考えず素直に作ったら以下のようになりました。
条件を誤解しているかもしれません。私の解釈はanalyzeの中ごろにある
printfのとおりです。間違っていたら御指摘ください。
なお掲載に当たって行数を節約するために引数チェックは行っていません。
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
/* 途中経過を表示するか？ */
int g_verbose = 0;
/* 結果格納領域 */
typedef struct _result{
int count[3];
}result_t;
/* プロトタイプ */
result_t analyze(const char* original);
int get_S(const char* sequence);
int condition1(int S);
int condition2(const char* sequence, int S, int n);
int condition3(const char* sequence, int S, int n, int X);
/* main */
int main(int argc, char* argv[]){
result_t result = analyze(argv[1]);
printf("条件１:%d\n条件２:%d\n条件３:%d\n",
result.count[0], result.count[1], result.count[2]);
return 0;
}
/* 解析 */
result_t analyze(const char* original){
/* 結果格納領域 */
result_t result = { {0, 0, 0} };
/* 作業領域 */
char* work_area;
/* ループ変数等 */
size_t ix_delete, ix_insert, ix_from, ix_to;
int ch;
/* 解析用変数 */
size_t n;
int S;
int X;
/* 途中経過表示用連番 */
int no = 0;
/* 剰余係数の算出 */
X = get_S(original);
if ( g_verbose ) printf("X=%d\n", X);
if ( X == 0 ){
printf("Xが0になるので解析できません。\n");
return result;
}
/* 長さの取得と作業領域の初期化 */
n = strlen(original);
work_area = (char*)malloc(sizeof(char)*(n+1));
work_area[n] = '\0';
if ( g_verbose ){
printf("条件１：S!=0\n");
printf("条件２：0 < S <= n(%3d) かつ RS=0\n", n);
printf("条件３：X-n(%3d)<= S < n(%3d) かつ RS=1\n", X-n, n);
}
/* 先頭から順に削除する */
for ( ix_delete = 0; ix_delete < n; ++ix_delete ){
/* 先頭から順に挿入する */
for ( ix_insert = 0; ix_insert < n; ++ix_insert){
for ( ch = '0'; ch <= '1'; ++ch ){
/* 系列の作成 */
ix_from = 0;
for ( ix_to = 0; ix_to < n; ++ix_to ){
if ( ix_from == ix_delete ) ++ix_from;
if ( ix_to == ix_insert ) work_area[ix_to] = ch;
else work_area[ix_to] = original[ix_from++];
}
if ( g_verbose ){
++no;
printf("%05d:%s", no, work_area);
}
/* 条件成立判定 */
S = get_S(work_area) % X;
if ( g_verbose ) printf(" S=%03d RS=%c", S, ( (0 < S && S <= (int)n) ? work_area[S-1] : '-'));
if ( condition1(S) ) ++result.count[0];
if ( condition2(work_area, S, n) ) ++result.count[1];
if ( condition3(work_area, S, n, X) ) ++result.count[2];
if ( g_verbose ) printf("\n");
}
}
}
free(work_area);
return result;
}
/* 系列の重みつきビット合計 */
int get_S(const char* sequence){
int S = 0;
int i;
for ( i = 1; sequence[i-1] != '\0'; ++i )
if ( sequence[i-1] == '1' ) S += i;
return S;
}
/* S＝０でないもの */
int condition1(int S){
if ( S != 0 ){
if ( g_verbose ) printf(" Y");
return 1;
}else{
if ( g_verbose ) printf(" N");
return 0;
}
}
/* ０＜S≦ｎ かつ RS＝１でないもの */
int condition2(const char* sequence, int S, int n){
if ( 0 < S && S <= n && sequence[S-1] != '1' ){
if ( g_verbose ) printf(" Y");
return 1;
}else{
if ( g_verbose ) printf(" N");
return 0;
}
}
/* X−ｎ≦S＜ｎ かつ RS＝０でないもの */
int condition3(const char* sequence, int S, int n, int X){
if ( X - n <= S && S < n && 0 < S && sequence[S-1] != '0' ){
if ( g_verbose ) printf(" Y");
return 1;
}else{
if ( g_verbose ) printf(" N");
return 0;
}
}
|
