diff options
| author | Philip Hood <hood@panix.com> | 2020-10-19 14:33:52 -0400 |
|---|---|---|
| committer | Philip Hood <hood@panix.com> | 2020-10-19 14:33:52 -0400 |
| commit | 6012336a8dbad470ad110a67b8e2f8a61b9e95b1 (patch) | |
| tree | 3d45ee5652076ce51243399b073657ddc6516b67 | |
| parent | 52ae56bdd93bb55f04ee3d75bc45365b31e80306 (diff) | |
| download | perlweeklychallenge-club-6012336a8dbad470ad110a67b8e2f8a61b9e95b1.tar.gz perlweeklychallenge-club-6012336a8dbad470ad110a67b8e2f8a61b9e95b1.tar.bz2 perlweeklychallenge-club-6012336a8dbad470ad110a67b8e2f8a61b9e95b1.zip | |
c code for challenge #83.
| -rw-r--r-- | challenge-083/pkmnx/c/ch-1.c | 37 |
1 files changed, 37 insertions, 0 deletions
diff --git a/challenge-083/pkmnx/c/ch-1.c b/challenge-083/pkmnx/c/ch-1.c new file mode 100644 index 0000000000..837b5927d7 --- /dev/null +++ b/challenge-083/pkmnx/c/ch-1.c @@ -0,0 +1,37 @@ +#include <stdio.h> +#include <ctype.h> + +int main() { + + char c; + char state; + + long tot = 0; + long acc = 0; + long c_cnt = 0; + + while ( (c = getchar()) != EOF ) { + + if ( isspace(c) ) { + state = 's'; + } else { + state = state == 's' ?'c' :'w'; + acc++; + } + + if ( c_cnt >= 1 ) { + tot += state == 'c' ?acc : 0; + } + + if ( state == 'c' ) { + c_cnt++; + acc = 0; + } + + } + + printf( "%ld\n", tot ); + + return 0; + +} |
