Datei: vectcalc.c


    1   /*
    2    *      vectcalc.c
    3    *      Primitiver Vektorrechner
    4    *      klin, Wed Dec  8 19:00:53 1999
    5    */
    6   
    7   #include <stdio.h>
    8   
    9   #define MAX 20
   10   
   11   void main(void)
   12   {
   13     char buf[256];        /* Eingabepuffer */
   14     double da[MAX];       /* Elemente      */
   15     double res;           /* Resultat      */
   16     char op;              /* Operation     */
   17     int n, i;             /* Zaehler       */
   18   
   19     /* Operation ermitteln */
   20     do {
   21       printf("Operation (+-*/): ");
   22       gets(buf);
   23       op = buf[0];
   24     } while ( !(op == '+' || op == '-' || op == '*' || op == '/'));
   25     
   26     /* Vektorelemente einlesen */
   27     for (n = 0; n < MAX; n++) {
   28       printf("Element #%02d: ", n + 1);
   29       gets(buf);
   30       sscanf(buf, "%lf", &da[n]);
   31       if (da[n] == 0.0) {
   32         break;
   33       }
   34     }
   35     
   36     /* Vektorelemente berechnen */
   37     res = da[0];
   38     switch (op) {
   39       case '+':
   40         for (i = 1; i < n; i++)
   41   	res = res + da[i];
   42         break;
   43       case '-':
   44         for (i = 1; i < n; i++)
   45   	res = res - da[i];
   46         break;
   47       case '*':
   48         for (i = 1; i < n; i++)
   49   	res = res * da[i];
   50         break;
   51       case '/':
   52         for (i = 1; i < n; i++)
   53   	res = res / da[i];
   54         break;
   55     }
   56   
   57     /* Ergebnis ausgeben */
   58     printf("Resultat (%d Elemente): %lf\n", n, res);
   59     
   60   } /* main() */


Erzeugt von c2html 1.01