Форум программистов, компьютерный форум CyberForum.ru

Визуальное программирование. Считывание теста - C++

Восстановить пароль Регистрация
 
Shax_04
 Аватар для Shax_04
2 / 2 / 0
Регистрация: 02.11.2012
Сообщений: 20
22.11.2012, 02:46     Визуальное программирование. Считывание теста #1
Создать программу, которая могла бы считывать введённую функцию и потом рассчитать по ней.
Как сие реализовать?
Миниатюры
Визуальное программирование. Считывание теста  
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.11.2012, 02:46     Визуальное программирование. Считывание теста
Посмотрите здесь:

C++ Визуальное представление в виде WPF или CLI
C++ Визуальное отображение иерархии
Поиск теста C++
C++ Считывание из файла (узнать максимальный балл за три теста и вывести фамилию и имя...)
C++ Из теста
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Croessmah
Модератор
Эксперт С++
 Аватар для Croessmah
11845 / 6824 / 771
Регистрация: 27.09.2012
Сообщений: 16,919
Записей в блоге: 2
Завершенные тесты: 1
22.11.2012, 02:51     Визуальное программирование. Считывание теста #2
Разобрать строку на части и выполнить. Лучше построить дерево.
igorrr37
 Аватар для igorrr37
1593 / 1221 / 118
Регистрация: 21.12.2010
Сообщений: 1,868
Записей в блоге: 7
22.11.2012, 11:09     Визуальное программирование. Считывание теста #3
в студии отключи юникод
main.cpp
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
#define _CRT_SECURE_NO_WARNINGS
#define _CRT_NON_CONFORMING_SWPRINTFS
#include <windows.h>
#include <stdlib.h>
#include <string>
#include <string.h>
#include <tchar.h>
#include <iostream>
#include "parser.h"
 
static TCHAR szWindowClass[] = _T("wndClass");
static TCHAR szTitle[] = _T("Calculator");
TCHAR buf[256];
TCHAR bufx[32];
 
HINSTANCE hInst;
 
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
 
int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
                   LPSTR lpCmdLine, int nCmdShow)
{
 
    WNDCLASSEX wcex;
 
    wcex.cbSize = sizeof(WNDCLASSEX);
    wcex.style          = CS_HREDRAW | CS_VREDRAW;
    wcex.lpfnWndProc    = WndProc;
    wcex.cbClsExtra     = 0;
    wcex.cbWndExtra     = 0;
    wcex.hInstance      = hInstance;
    wcex.hIcon          = LoadIcon(hInstance, IDI_APPLICATION);
    wcex.hCursor        = LoadCursor(NULL, IDC_ARROW);
    wcex.hbrBackground  = (HBRUSH)(COLOR_WINDOW);
    wcex.lpszMenuName   = NULL;
    wcex.lpszClassName  = szWindowClass;
    wcex.hIconSm        = LoadIcon(wcex.hInstance, IDI_APPLICATION);
 
    if (!RegisterClassEx(&wcex))
    {
        MessageBox(NULL, _T("RegisterClassEx failed"), _T("Message"), 0);
        return __LINE__;
    }
 
    hInst = hInstance;
 
    HWND hWnd = CreateWindow(
        szWindowClass,
        szTitle,
        WS_SYSMENU,
        CW_USEDEFAULT, CW_USEDEFAULT,
        255, 220,
        NULL,
        NULL,
        hInstance,
        NULL
    );
 
    if (!hWnd)
    {
        MessageBox(NULL, _T("CreateWindow failed"), _T("Message"), 0);
        return __LINE__;
    }
 
    ShowWindow(hWnd,nCmdShow);
    UpdateWindow(hWnd);
 
   MSG msg;
    while (GetMessage(&msg, NULL, 0, 0))
    {
        TranslateMessage(&msg);
        DispatchMessage(&msg);
    }
 
    return (int) msg.wParam;
}
 
#define ID_EDIT_Fml  99
#define ID_EDIT_Val  99
#define ID_EDIT_Res  99
#define ID_BUTTON_GO    100
#define ID_BUTTON_C    101
 
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
 
    static HWND hButtonGo, hButtonC, hEditFml, hEditVal, hEditRes;
    PAINTSTRUCT ps;
    HDC hdc;
 
    switch (message)
    { // -2.5 + (-x) / (-x + 2)
        case WM_CREATE:
            hEditFml = CreateWindow(_T("edit"), _T(""), WS_CHILD | WS_VISIBLE | WS_BORDER | ES_RIGHT, 10, 5, 230, 35, hWnd, (HMENU)ID_EDIT_Fml, hInst, 0);
            hEditVal = CreateWindow(_T("edit"), _T(""), WS_CHILD | WS_VISIBLE | WS_BORDER | ES_RIGHT, 10, 45, 230, 35, hWnd, (HMENU)ID_EDIT_Val, hInst, 0);
            hEditRes = CreateWindow(_T("edit"), _T(""), WS_CHILD | WS_VISIBLE | WS_BORDER | ES_RIGHT, 10, 85, 230, 35, hWnd, (HMENU)ID_EDIT_Res, hInst, 0);
            hButtonGo = CreateWindow (_T("Button"), _T("go"), WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON,  10, 150, 80, 30, hWnd, (HMENU)ID_BUTTON_GO, hInst, 0);
            hButtonC = CreateWindow (_T("Button"), _T("clear"), WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON,  100, 150, 80, 30, hWnd, (HMENU)ID_BUTTON_C, hInst, 0);
            break;
        case WM_COMMAND:
            if((LOWORD(wParam)==ID_BUTTON_GO)&&(HIWORD(wParam)==BN_CLICKED))
            {
                GetWindowText(hEditFml, buf, sizeof(buf));
                GetWindowText(hEditVal, bufx, sizeof(bufx));
                typedef std::basic_string<TCHAR> tstring;
                tstring s(buf), sx(bufx);
                if('-' == sx[0])
                    sx = tstring(_T("(")) + sx + tstring(_T(")"));
                tstring::size_type ind;
                while((ind = s.find(TEXT('x'))) != std::basic_string<TCHAR>::npos)
                {
                    s.replace(ind, 1, sx);
                }
                SetWindowText(hEditRes, s.c_str());
                TParser parser;
                static double x[10];
                parser.SetX((double *)&x);
                try
                {
                  // Evaluate expr.
                  parser.Compile(const_cast<char*>(s.c_str()));
                  parser.Evaluate();
                  _stprintf(buf, TEXT("%lf"), parser.GetResult());
                }
                catch(TError error)
                {
                  // Print error.
                  _stprintf(buf, TEXT("NAN"));
                }
                SetWindowText(hEditRes, buf);
            }
            else if((LOWORD(wParam)==ID_BUTTON_C)&&(HIWORD(wParam)==BN_CLICKED))
            {
                SetWindowText(hEditFml, _T(""));
                SetWindowText(hEditVal, _T(""));
                SetWindowText(hEditRes, _T(""));
            }
        case WM_PAINT:
            hdc = BeginPaint(hWnd, &ps);
            EndPaint(hWnd, &ps);
            break;
        case WM_DESTROY:
            PostQuitMessage(0);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
            break;
    }
    return 0;
}

парсер из соседнего топика
parser.h
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
// main.cpp
// Содержит тестовую программу для модуля parser.cpp.
// Writen by Chaos Master, 17th of Febrary, 2000.
 
// Includes
#define M_PI             3.1415926535897932384626433832795
#include <cstring>
#include <iostream>
#include <cstdio>
// parser.cpp
// Этот файл содержит реализацию класса TParser,
// осуществляющего разбор заданного математического выражения.
// Written by Chaos Master, 11th of Febrary, 2000.
 
// Includes
//#include "stdafx.h"
#include <math.h>
// parser.h
// Этот файл содержит описание класса TParser,
// осуществляющего разбор заданного математического выражения.
// Written by Chaos Master, 11th of Febrary, 2000.
 
#if !defined(__SOLVER_H)
#define __SOLVER_H
 
// Includes
#include <string.h>
#include <vector>
using namespace std;
 
// Defines
#define MAX_EXPR_LEN   255
#define MAX_TOKEN_LEN  80
 
struct TParserNode
{
   double value;
   TParserNode *left;
   TParserNode *right;
 
   TParserNode(double _value=0.0, TParserNode *_left=NULL, TParserNode *_right=NULL)
      { value = _value; left = _left; right = _right; }
};
 
struct TError
{
   char *error;
   int pos;
 
   TError() {};
   TError(char *_error, int _pos) { error=_error; pos=_pos; }
};
 
class TParser
{
  private:
   TParserNode *root;
   char *expr;
   char curToken[MAX_TOKEN_LEN];
   enum { PARSER_PLUS, PARSER_MINUS, PARSER_MULTIPLY, PARSER_DIVIDE, PARSER_PERCENT, PARSER_POWER,
          PARSER_SIN, PARSER_COS, PARSER_TG, PARSER_CTG, PARSER_ARCSIN, PARSER_ARCCOS, PARSER_ARCTG, PARSER_ARCCTG, PARSER_SH, PARSER_CH, PARSER_TH, PARSER_CTH,
          PARSER_EXP, PARSER_LG, PARSER_LN, PARSER_SQRT, PARSER_X, PARSER_L_BRACKET, PARSER_R_BRACKET, PARSER_E, PARSER_PI, PARSER_NUMBER, PARSER_END } typToken;
   int pos;
 
   const double *x;
   double result;
 
   vector<TParserNode *> history;
 
  private:
   TParserNode *CreateNode(double _value=0.0, TParserNode *_left=NULL, TParserNode *_right=NULL);
 
   TParserNode *Expr(void);
   TParserNode *Expr1(void);
   TParserNode *Expr2(void);
   TParserNode *Expr3(void);
   TParserNode *Expr4(void);
   TParserNode *Expr5(void);
 
   bool GetToken(void);
   bool IsDelim(void) { return (strchr("+-*/%^()[]", expr[pos])!=NULL); }
   bool IsLetter(void) { return ((expr[pos]>='a' && expr[pos]<='z') ||
                                 (expr[pos]>='A' && expr[pos]<='Z')); }
   bool IsDigit(void) { return (expr[pos]>='0' && expr[pos]<='9'); }
   bool IsPoint(void) { return (expr[pos]=='.'); }
 
   double CalcTree(TParserNode *tree);
   void  DelTree(TParserNode *tree);
 
   void SendError(int errNum);
 
  public:
   TParser() { result = 0.0; x = NULL; root = NULL; }
   ~TParser() { DelTree(root); root=NULL; }
   void SetX(const double *_x) { x=_x; }
   //void SetY(double _y) { y=_y; }
 
   bool Compile(char *expr);
   void Decompile() { DelTree(root); root=NULL; }
 
   double Evaluate();
   double Evaluate(double *_x) { SetX(_x); return Evaluate(); }
   double Evaluate(double x, ...) { SetX(&x); return Evaluate(); }
 
   double GetResult(void) { return result; }
};
 
#endif
 
// Defines
// operations...
#define OP_PLUS          0
#define OP_MINUS         1
#define OP_MULTIPLY      2
#define OP_DIVIDE        3
#define OP_PERCENT       4
#define OP_POWER         5
#define OP_UMINUS        6
 
#define OP_SIN           10
#define OP_COS           11
#define OP_TG            12
#define OP_CTG           13
#define OP_ARCSIN        14
#define OP_ARCCOS        15
#define OP_ARCTG         16
#define OP_ARCCTG        17
#define OP_SH            18
#define OP_CH            19
#define OP_TH            20
#define OP_CTH           21
#define OP_EXP           22
#define OP_LG            23
#define OP_LN            24
#define OP_SQRT          25
#define OP_X             26
 
// PI...
 
 
// Member functions
TParserNode *TParser::CreateNode(double _value, TParserNode *_left, TParserNode *_right)
{
   TParserNode *pNode = new TParserNode(_value, _left, _right);
   history.push_back(pNode);
   return pNode;
}
 
void TParser::SendError(int errNum)
{
   static char const*errs[7] = { NULL,
                            NULL,
                            "Unexpected end of expression",
                            "End of expression expected",
                            "'(' or '[' expected",
                            "')' or ']' expected",
                            NULL
                         };
   static char buffer[80];
 
   int len = strlen(curToken);
 
   if(*curToken=='\0')
      strcpy(curToken, "EOL");
 
   switch(errNum)
   {
      case 0:
         sprintf(buffer, "Unknown keyword: '%s'", curToken);
         errs[0] = buffer;
         break;
 
      case 1:
         sprintf(buffer, "Unknown symbol: '%s'", curToken);
         errs[1] = buffer;
         break;
 
      case 6:
         sprintf(buffer, "Unexpected '%s'", curToken);
         errs[6] = buffer;
         break;
   }
 
   TError error(const_cast<char*>(errs[errNum]), pos-len);
 
   for(int i=0; i<history.size(); i++)
      delete history[i];
   history.clear();
 
   root = NULL;
 
   throw error;
 
   return;
}
 
bool TParser::GetToken(void)
{
   *curToken = '\0';
 
   while(expr[pos]==' ') pos++;
 
   if(expr[pos]=='\0')
   {
      curToken[0] = '\0';
      typToken = PARSER_END;
      return true;
   }
   else if(IsDelim())
   {
      curToken[0] = expr[pos++];
      curToken[1] = '\0';
      switch(*curToken)
      {
         case '+': typToken = PARSER_PLUS; return true;
         case '-': typToken = PARSER_MINUS; return true;
         case '*': typToken = PARSER_MULTIPLY; return true;
         case '/': typToken = PARSER_DIVIDE; return true;
         case '%': typToken = PARSER_PERCENT; return true;
         case '^': typToken = PARSER_POWER; return true;
         case '[':
         case '(': typToken = PARSER_L_BRACKET; return true;
         case ']':
         case ')': typToken = PARSER_R_BRACKET; return true;
      }
   }
   else if(IsLetter())
   {
      int i=0;
      while(IsLetter()) curToken[i++] = expr[pos++];
      curToken[i] = '\0';
 
      int len = strlen(curToken);
      for(i=0; i<len; i++)
         if(curToken[i]>='A' && curToken[i]<='Z')
            curToken[i] += 'a' - 'A';
 
      if(!strcmp(curToken, "x"))           { typToken = PARSER_X; return true; }
      else if(!strcmp(curToken, "pi"))     { typToken = PARSER_PI; return true; }
      else if(!strcmp(curToken, "e"))      { typToken = PARSER_E; return true; }
      else if(!strcmp(curToken, "sin"))    { typToken = PARSER_SIN; return true; }
      else if(!strcmp(curToken, "cos"))    { typToken = PARSER_COS; return true; }
      else if(!strcmp(curToken, "tg"))     { typToken = PARSER_TG; return true; }
      else if(!strcmp(curToken, "ctg"))    { typToken = PARSER_CTG; return true; }
      else if(!strcmp(curToken, "arcsin")) { typToken = PARSER_ARCSIN; return true; }
      else if(!strcmp(curToken, "arccos")) { typToken = PARSER_ARCCOS; return true; }
      else if(!strcmp(curToken, "arctg"))  { typToken = PARSER_ARCTG; return true; }
      else if(!strcmp(curToken, "arcctg")) { typToken = PARSER_ARCCTG; return true; }
      else if(!strcmp(curToken, "sh"))     { typToken = PARSER_SH; return true; }
      else if(!strcmp(curToken, "ch"))     { typToken = PARSER_CH; return true; }
      else if(!strcmp(curToken, "th"))     { typToken = PARSER_TH; return true; }
      else if(!strcmp(curToken, "cth"))    { typToken = PARSER_CTH; return true; }
      else if(!strcmp(curToken, "exp"))    { typToken = PARSER_EXP; return true; }
      else if(!strcmp(curToken, "lg"))     { typToken = PARSER_LG; return true; }
      else if(!strcmp(curToken, "ln"))     { typToken = PARSER_LN; return true; }
      else if(!strcmp(curToken, "sqrt"))   { typToken = PARSER_SQRT; return true; }
      else SendError(0);
   }
   else if(IsDigit() || IsPoint())
   {
      int i=0;
      while(IsDigit()) curToken[i++] = expr[pos++];
      if(IsPoint())
      {
         curToken[i++] = expr[pos++];
         while(IsDigit()) curToken[i++] = expr[pos++];
      }
      curToken[i] = '\0';
      typToken = PARSER_NUMBER;
      return true;
   }
   else
   {
      curToken[0] = expr[pos++];
      curToken[1] = '\0';
      SendError(1);
   }
 
   return false;
}
 
bool TParser::Compile(char *_expr)
{
   pos = 0;
   expr = _expr;
   *curToken = '\0';
   if(root!=NULL)
   {
      DelTree(root);
      root = NULL;
   }
 
   history.clear();
 
   GetToken();
   if(typToken==PARSER_END) SendError(2);
   root = Expr();
   if(typToken!=PARSER_END) SendError(3);
 
   history.clear();
 
   return true;
}
 
TParserNode *TParser::Expr(void)
{
   TParserNode *temp = Expr1();
 
   while(1)
   {
      if(typToken==PARSER_PLUS)
      {
         GetToken();
         temp = CreateNode(OP_PLUS, temp, Expr1());
      }
      else if(typToken==PARSER_MINUS)
      {
         GetToken();
         temp = CreateNode(OP_MINUS, temp, Expr1());
      }
      else break;
   }
 
   return temp;
}
 
TParserNode *TParser::Expr1(void)
{
   TParserNode *temp = Expr2();
 
   while(1)
   {
      if(typToken==PARSER_MULTIPLY)
      {
         GetToken();
         temp = CreateNode(OP_MULTIPLY, temp, Expr2());
      }
      else if(typToken==PARSER_DIVIDE)
      {
         GetToken();
         temp = CreateNode(OP_DIVIDE, temp, Expr2());
      }
      else if(typToken==PARSER_PERCENT)
      {
         GetToken();
         temp = CreateNode(OP_PERCENT, temp, Expr2());
      }
      else break;
   }
 
   return temp;
}
 
TParserNode *TParser::Expr2(void)
{
   TParserNode *temp = Expr3();
 
   while(1)
   {
      if(typToken==PARSER_POWER)
      {
         GetToken();
         temp = CreateNode(OP_POWER, temp, Expr2());
      }
      else break;
   }
 
   return temp;
}
 
TParserNode *TParser::Expr3(void)
{
   TParserNode *temp;
 
   if(typToken==PARSER_PLUS)
   {
      GetToken();
      temp = Expr4();
   }
   else if(typToken==PARSER_MINUS)
   {
      GetToken();
      temp = CreateNode(OP_UMINUS, Expr4());
   }
   else
      temp = Expr4();
 
   return temp;
}
 
TParserNode *TParser::Expr4(void)
{
   TParserNode *temp;
 
   if(typToken>=PARSER_SIN && typToken<=PARSER_X)
   {
      temp = CreateNode(OP_SIN-PARSER_SIN+typToken);
      GetToken();
      if(typToken!=PARSER_L_BRACKET) SendError(4);
      GetToken();
      temp->left = Expr();
      if(typToken!=PARSER_R_BRACKET) SendError(5);
      GetToken();
   }
   else
      temp = Expr5();
 
   return temp;
}
 
TParserNode *TParser::Expr5(void)
{
   TParserNode *temp = 0;
 
   switch(typToken)
   {
      case PARSER_NUMBER:
         temp = CreateNode((double)atof(curToken));
         GetToken();
         break;
 
      case PARSER_PI:
         temp = CreateNode((double)M_PI);
         GetToken();
         break;
 
      case PARSER_E:
         temp = CreateNode((double)exp(1));
         GetToken();
         break;
 
      case PARSER_L_BRACKET:
         GetToken();
         temp = Expr();
         if(typToken!=PARSER_R_BRACKET) SendError(5);
         GetToken();
         break;
 
      default:
         SendError(6);
   }
 
   return temp;
}
 
double TParser::Evaluate(void)
{
   result = CalcTree(root);
   return result;
}
 
double TParser::CalcTree(TParserNode *tree)
{
   static double temp;
 
   if(tree->left==NULL && tree->right==NULL)
      return tree->value;
   else
      switch((int)tree->value)
      {
         case OP_PLUS:
            return CalcTree(tree->left)+CalcTree(tree->right);
 
         case OP_MINUS:
            return CalcTree(tree->left)-CalcTree(tree->right);
 
         case OP_MULTIPLY:
            return CalcTree(tree->left)*CalcTree(tree->right);
 
         case OP_DIVIDE:
            return CalcTree(tree->left)/CalcTree(tree->right);
 
         case OP_PERCENT:
            return (int)CalcTree(tree->left)%(int)CalcTree(tree->right);
 
         case OP_POWER:
            return (double)pow(CalcTree(tree->left),CalcTree(tree->right));
 
         case OP_UMINUS:
            return -CalcTree(tree->left);
 
         case OP_SIN:
            return sin(CalcTree(tree->left));
 
         case OP_COS:
            return cos(CalcTree(tree->left));
 
         case OP_TG:
            return tan(CalcTree(tree->left));
 
         case OP_CTG:
            return 1.0/tan(CalcTree(tree->left));
 
         case OP_ARCSIN:
            return asin(CalcTree(tree->left));
 
         case OP_ARCCOS:
            return acos(CalcTree(tree->left));
 
         case OP_ARCTG:
            return atan(CalcTree(tree->left));
 
         case OP_ARCCTG:
            return M_PI/2.0-atan(CalcTree(tree->left));
 
         case OP_SH:
            temp = CalcTree(tree->left);
            return (exp(temp)-exp(-temp))/2.0;
 
         case OP_CH:
            temp = CalcTree(tree->left);
            return (exp(temp)+exp(-temp))/2.0;
 
         case OP_TH:
            temp = CalcTree(tree->left);
            return (exp(temp)-exp(-temp))/(exp(temp)+exp(-temp));
 
         case OP_CTH:
            temp = CalcTree(tree->left);
            return (exp(temp)+exp(-temp))/(exp(temp)-exp(-temp));
 
         case OP_EXP:
            return exp(CalcTree(tree->left));
 
         case OP_LG:
            return log10(CalcTree(tree->left));
 
         case OP_LN:
            return log(CalcTree(tree->left));
 
         case OP_SQRT:
            return sqrt(CalcTree(tree->left));
 
         case OP_X:
            return x[int(CalcTree(tree->left))];
      }
 
   return 0;
}
 
void TParser::DelTree(TParserNode *tree)
{
   if(tree==NULL) return;
 
   DelTree(tree->left);
   DelTree(tree->right);
 
   delete tree;
 
   return;
}
Shax_04
 Аватар для Shax_04
2 / 2 / 0
Регистрация: 02.11.2012
Сообщений: 20
22.11.2012, 22:55  [ТС]     Визуальное программирование. Считывание теста #4
Спасибо за помощь, но я прошу прощения. Я не совсем понимаю о чём речь.
Я начал изучать C++ сравнительно недавно и тут такие термины.
Насколько я понял, то помимо исходного кода мы подключаем дополнительный "обработчик" вводимого текста.
Пожалуйста, изъясните чуть более подробней)
asidorchenko
379 / 205 / 25
Регистрация: 09.04.2012
Сообщений: 635
23.11.2012, 11:38     Визуальное программирование. Считывание теста #5
Сообщение было отмечено автором темы, экспертом или модератором как ответ
Задача решается построением конечного автомата. При синтаксическом разборе выражения строится дерево. Нужно использовать структуру данных стек.

Конечный автомат - это кортеж терминальных символов, нетерминальных символов, таблицы переходов, множества начальных и конечных состояний.

Конечные автоматы используются программистами железа, например инженерами компаний Intel, AMD, nVidia и др крупных производителей логики микросхем ( процессоров, оперативной памяти, материнских плат, видеокарт и т.п.).

Как строится конечный автомат? Предположим, мы можем использовать только символы 0 и 1, и нам нужно определить содержится ли в последовательности четное количество 0 и нечетное количество 1.

Начальное состояние чтение цепочки 0. Если нечетное количество 0 или четное количество 1, то значит цепочка не соответствует условиям грамматики. В начальном состоянии количество 0 и 1 является четным (это не допускающее состояние).

Из цепочки может быть считано либо 0, либо 1.

Предположим, считано 0, тогда пусть состояние чтение цепочки будет 1. Предположим, считано 1, тогда пусть состояние чтения цепочки будет 2. Таким образом конечный автомат распознавания цепочки приобретает вид:
________символы
состояние| 0 | 1 |
--------------------------
0 _______| 1 | 2 | ->err

-> err значит что состояние не является допускающим.

В 1 состоянии количество 0 нечетное, количество 1 - четное, так как 0 считаем четным числом. В состоянии 1 цепочка не соответствует условиям, таким образом состояние 1 не может быть допускающим состоянием чтения цепочки.
Во 2 состоянии количество 1 нечетное, количество 0 - четное. В состоянии 1 цепочка соответствует условиям. Состояние 2 допускающее.

В 1 состоянии может быть считана либо 0, либо 1. Если считано 0, то состояние нулей снова становится четным, количество 1 остается четным. Это эквивалентно 0 состоянию. Конечный автомат распознавания цепочки приобретает вид:
________символы
состояние| 0 | 1 |
--------------------------
0________| 1 | 2 | ->err
1________| 0 | |->err

Если в 1 состоянии считано 1, то количество 1 становится нечетным ( количество 0 было нечетным). Требуется новое состояние, пусть это будет состояние 3. Конечный автомат распознавания цепочки приобретает вид:
________символы
состояние| 0 | 1 |
--------------------------
0________| 1 | 2 | ->err
1________| 0 | 3 | ->err
Состояние 3 не является допускающим.

Во 2 состоянии может быть считано 0 или 1. Если считано во 2 состоянии 0, тогда количество 0 становится нечетным, количество 1 остается нечетным. Это состояние эквивалентно состоянию 3. Состояние не допускающее. Конечный автомат распознавания цепочки приобретает вид:
________символы
состояние| 0 | 1 |
--------------------------
0________| 1 | 2 | ->err
1________| 0 | 3 | ->err
2________| 3 | 0 |

Если считано во 2 состоянии 1,тогда количество 1 становится четным, количество 0 остается четным. Состояние недопускающее. Оно эквивалентно состоянию 0.


0 состояние: четное количество 0 и 1
1 состояние: нечетное количество 0, четное количество 1
2 состояние: нечетное количество 1, четное количество 0
3 состояние: нечетное количество 0, нечетное количество 1

В 3 состоянии может быть считано 0 или 1. Если считано в 3 состоянии 0, то количество 1 становится четным, количество 0 остается нечетным. Это состояние 1. Конечный автомат распознавания цепочки приобретает вид:
________символы
состояние| 0 | 1 |
--------------------------
0________| 1 | 2 | ->err
1 _______| 0 | 3 | ->err
2________| 3 | 0 |
3________| 1

Если считано в 3 состоянии 1, то количество 0 становится четным, количество 1 остается нечетным. Это состояние 2.Конечный автомат распознавания цепочки приобретает вид:
________символы
состояние| 0 | 1 |
--------------------------
0________| 1 | 2 | ->err
1________| 0 | 3 | ->err
2________| 3 | 0 |
3________| 1 | 2 | ->err

Конечный автомат построен. Если по завершения чтении цепочки состояние не 2, то цепочка не является допускающей, а значит не соответствует грамматике.

Логика программы реализуется следующим образом
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
char* x = "1010"; // цепочка
int state = 0; //текущее состояние
int i;
for(i=0;i<strlen(x);i++)
{
switch (state)
{
case 0:
switch (x[i])
{
case '0':
state = 1;
break;
case '1':
state = 2;
break;
}
break;
case 1:
switch (x[i])
{
case '0':
state = 0;
break;
case '1':
state = 3;
break;
}
break;
case 2:
switch (x[i])
{
case '0':
state = 3;
break;
case '1':
state = 0;
break;
}
break;
case 3:
switch (x[i])
{
case '0':
state = 1;
break;
case '1':
state = 2;
break;
}
break;
}
}
Теперь после введения в то, что такое конечный автомат, и как он строится, вернемся к вашей задаче. Символами могут быть любые цифры, '(', ')' и '+' а также буквы 'p','o','w', 'x'.

Стек это структура данных LIFO ( last in, first out). Последним зашел - первым вышел. В классе стек должен быть реализован метод push - занесение в стек и метод pop - вынесения из стека. Предположим мы организовываем стек на основе структуры char, тогда класс будет выглядеть следующим образом.

C++
1
2
3
4
5
6
7
8
9
struct stack
{
char x[32]; // размер стека 32
int p_top; // указатель на вершину стека
 
stack() {p_top = -1;}
void push(){p_top++; if (p_top>31) p_top = 31; /*достигнута верхушка стека*/}
void pop(){if (p_top<0) return; p_top--; }
};
Пусть цепочка как на скриншоте "(pow(x,9)+35)/68".

При чтении '(' заносится на верхушку стека. Другой способ это рекурсивный вызов.

Частный случай решения:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <math.h>
 
/*
struct stack
{
char** x;
int p_top; // указатель на вершину стека
 
stack() {p_top = -1;}
void push(){p_top++;}
void pop(){if (p_top<0) return; p_top--; }
};
*/
 
// односвязный список идентификаторов
struct identifier
{
  char* name; // название идентификатора
  int value;  // значение идентификатора
  struct identifier* next;  // следующий элемент односвязного списка
 
  identifier(char* b, int c) // конструктор структуры
  {
   int l = strlen(b);
   name = new char[l+1];
   name[l]='\0';
   strcpy(name,b);
   value = c;
   next = NULL;
   }
 
 void print(){ printf("%s %d\n", name, value); }
 
};
 
identifier a("x", 4);
 
// односвязный список функций
struct function
{
  char* name; // название функции
  int value1;  // значение параметра 1
  int value2;  // значение параметра 2
  struct function* next;  // следующий элемент односвязного списка
 
  function(char* b, int c, int d)
  {
   int l = strlen(b);
   name = new char[l+1];
   name[l]='\0';
   strcpy(name,b);
   value1 = c;
   value2 = d;
   next = NULL;
   }
 
  void add_next(char* b, int c, int d)
  {
    next = new function(b,c,d);
  }
 
 void print(){ printf("%s %d %d\n", name, value1, value2); }
 
};
 
function b("pow", -1, -1); // -1 значит "неопределено"
 
int recursive_lparen(char* x, int i, int s, int& r);//
int recursive_plus(char* x, char* oldbuf, int i, int s, int& r);
int recursive_del(char* x, char* oldbuf, int i, int s, int& r);
int recursive_func(char* x, int i, int s, int& r);
 
//
int main()
{
/*
char r[10];
r[0]='1';
r[1]='2';
r[2]='\0';
 
int u = atoi(r);
printf("%d\n", u);
exit(0);
*/
 
 char buf[256];
 int buf_size = 256;
 int buf_position = 0;
 char* x ="(pow(x,9)+35)/68"; // цепочка
 int state = 0; //текущее состояние
 int i;
 int retval;
 //printf("%d\n", strlen(x));
 //exit(0);
 for(i=0;i<strlen(x);i++)
 {
  printf("%c\n", x[i]);
  switch (state)
  {
  case 0: // начальное состояние
   switch (x[i])
   {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(':
      i = recursive_lparen(x, i, state,retval); // эквивалентно push для стека
      break;
    case ')': printf("error"); exit(0);  break;  // ошибка (не допускающее состояние)
    case 'p': state = 2; break;  // возможное начало функции
    case 'o': exit(0); break; // ошибка
    case 'w': exit(0); break; // ошибка
    case 'x': state = 3; break; // название идентификатора
    case '+': exit(0); break;  // ошибка
    case ',': exit(0); break;  // ошибка
    case '/': exit(0); break;  // ошибка
    default: exit(0); break; // ошибка
   }
  break;
  case 1: // состояние чтения числа
   switch (x[i])
   {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(': case ')': exit(0); break; // ошибка: во время чтения числа '('
    case '+': i = recursive_plus(x, buf, i, 5,retval);
     break;
    case ',': exit(0); break; // ошибка
    case '/': i = recursive_del(x, buf, i, 5,retval);
     break;
    default: exit(0); break; // ошибка
   }
  break;
  case 2: // возможное название функции
   switch (x[i]) {
    case 'o': state = 4; break;
    default: exit(0); break; // ошибка (недопускающее состояние)
   }
   break;
  case 3: // состояние: прочитан идентификатор
   break;
  case 4: // возможное название функции
   switch (x[i]) {
    case 'w': state = 5; break;
    default: exit(0); break; // ошибка
   }
   break;
  case 5: // состояние: прочитано название функции
   i = recursive_func(x, i, 5, retval);
   state = 0;
   printf("retval: %d\n", retval);
   itoa(retval, buf, 10);
   printf("buf: %s\n", buf);
   exit(0);
   break;
  }
 
  printf("%d %c\n" , state , x[i]);
 }
 
 
 
return 0;
}
 
// вместо стека можно использовать рекурсивные вызовы,
// однако реализация со стеком будет более грамотной
 
// функция обработки скобок
int recursive_lparen(char* x, int i, int s, int& r)
{
 int state = 0;
 printf("recursive_lparen: %d %d %d\n", i, s, strlen(x));
 
 char buf[256];
 int buf_size = 256;
 int buf_position = 0;
 int retval;
 
 for(i++;i<strlen(x);i++)
 {
  printf("x[%d] %c\n", i, x[i]);
  switch (state)
  {
   case 0:
    switch (x[i])
    {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(':
      i = recursive_lparen(x, i, 0,retval); // эквивалентно push для стека
      break;
    case ')':
     // скобка закрыта ( возврат из функции)
     return i;
     break;
    case 'p': state = 2; break;  // возможное начало функции
    case 'x': state = 3; break; // название идентификатора
    case 'o': case 'w': case '+': case ',': case '/': exit(0); break;  // ошибка
    default: exit(0); break; // ошибка
   }
   break;
  case 1: // состояние чтения числа
   switch (x[i])
   {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(': case ')': exit(0); break; // ошибка: во время чтения числа '('
    case '+':
     i = recursive_plus(x, buf, i, 5,retval);
     state = 1;
     printf("retval: %d\n", retval);
     itoa(retval, buf, 10);
     printf("buf: %s\n", buf);
     break;
    case ',': exit(0); break; // ошибка
    case '/':
     i = recursive_del(x, buf, i, 5,retval);
     break;
    default: exit(0); break; // ошибка
   }
  break;
  case 2: // возможное название функции
   switch (x[i]) {
    case 'o': state = 4; break;
    default: exit(0); break; // ошибка (недопускающее состояние)
   }
   break;
  case 3: // состояние: прочитан идентификатор
   break;
  case 4: // возможное название функции
   switch (x[i]) {
    case 'w': state = 5; break;
    default: exit(0); break; // ошибка
   }
   break;
  case 5: // состояние: прочитано название функции
   i = recursive_func(x, i, state,retval);
   state = 1;
   printf("retval: %d\n", retval);
   itoa(retval, buf, 10);
   printf("buf: %s\n", buf);
   break;
   }
 }
 // если попадаем сюда, значит количество правых и левых скобок является не соответствующим друг другу, то есть не произошел возврат из рекурсии в main
}
 
 
//
int recursive_plus(char* x, char* oldbuf, int i, int s, int& r)
{
 int state = 0;
 printf("recursive_plus: %d %d %d\n", i, s, strlen(x));
 
 char buf[256];
 int buf_size = 256;
 int buf_position = 0;
 int retval;
 
 int a1;
 int a2;
 
 for(i++;i<strlen(x);i++)
 {
  printf("x[%d] %c %d\n", i, x[i], state);
  switch (state)
  {
   case 0:
    switch (x[i])
    {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(':
      i = recursive_lparen(x, i, 0,retval); // эквивалентно push для стека
      break;
    case ')': exit(0); break;
    case 'p': state = 2; break;  // возможное начало функции
    case 'o': exit(0); break; // ошибка
    case 'w': exit(0); break; // ошибка
    case 'x': state = 3; break; // название идентификатора
    case '+': exit(0); break;  // ошибка
    case ',': exit(0); break;  // ошибка
    case '/': exit(0); break;  // ошибка
    default: exit(0); break; // ошибка
   }
   break;
  case 1: // состояние чтения числа
   switch (x[i])
   {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(': exit(0); break;
    case ')':
      a1 = atoi(oldbuf);
      a2 = atoi(buf);
      printf("%d %d\n", a1, a2);
      r = a1+a2;
      printf("%d\n", r);
      //exit(0);
      return i;
     break;
    case '+': i = recursive_plus(x, buf, i, 5,retval);
     break;
    case ',': exit(0); break; // ошибка
    case '/': i = recursive_del(x, buf, i, 5,retval);
     break;
    default: exit(0); break; // ошибка
   }
  break;
  case 2: // возможное название функции
   switch (x[i]) {
    case 'o': state = 4; break;
    default: exit(0); break; // ошибка (недопускающее состояние)
   }
   break;
  case 3: // состояние: прочитан идентификатор
   break;
  case 4: // возможное название функции
   switch (x[i]) {
    case 'w': state = 5; break;
    default: exit(0); break; // ошибка
   }
   break;
  case 5: // состояние: прочитано название функции
   i = recursive_func(x, i, state,retval);
   break;
   }
  }
 
 return i;
}
 
//
int recursive_del(char* x, char* oldbuf, int i, int s, int& r)
{
 int state = 0;
 printf("recursive_del: %d %d %d\n", i, s, strlen(x));
 char buf[256];
 int buf_size = 256;
 int buf_position = 0;
 int retval;
 
 for(i++;i<strlen(x);i++)
 {
  printf("x[%d] %c\n", i, x[i]);
  switch (state)
  {
   case 0:
    switch (x[i])
    {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(':
      i = recursive_lparen(x, i, 0,retval); // эквивалентно push для стека
      break;
    case ')': return i;  break;
    case 'p': state = 2; break;  // возможное начало функции
    case 'o': exit(0); break; // ошибка
    case 'w': exit(0); break; // ошибка
    case 'x': state = 3; break; // название идентификатора
    case '+': exit(0); break;  // ошибка
    case ',': exit(0); break;  // ошибка
    case '/': exit(0); break;  // ошибка
    default: exit(0); break; // ошибка
   }
   break;
  case 1: // состояние чтения числа
   switch (x[i])
   {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(': case ')': exit(0); break; // ошибка: во время чтения числа '('
    case '+': i = recursive_plus(x, buf, i, 5,retval);
     break;
    case ',': exit(0); break; // ошибка
    case '/': i = recursive_del(x, buf, i, 5,retval);
     break;
    default: exit(0); break; // ошибка
   }
  break;
  case 2: // возможное название функции
   switch (x[i]) {
    case 'o': state = 4; break;
    default: exit(0); break; // ошибка (недопускающее состояние)
   }
   break;
  case 3: // состояние: прочитан идентификатор
   break;
  case 4: // возможное название функции
   switch (x[i]) {
    case 'w': state = 5; break;
    default: exit(0); break; // ошибка
   }
   break;
  case 5: // состояние: прочитано название функции
   i = recursive_func(x, i, state,retval);
   break;
 
   }
 }
 
 
 int a1 = atoi(oldbuf);
 int a2 = atoi(buf);
 printf("%d %d\n", a1, a2);
 r = a1/a2;
 printf("%f\n", (float)a1/a2);
 exit(0);
 
 return i;
}
 
// чтение параметров функции
int recursive_func(char* x, int i, int s, int& r)
{
 printf("recursive_func: i:%d s:%d xlen:%d\n", i, s, strlen(x));
 int state = 0;
 
 char buf[256];
 int buf_size = 256;
 int buf_position = 0;
 
 char par1c[256];
 int par1c_size = 256;
 int par1c_position = 0;
 int par1 = -1;
 
 char par2c[256];
 int par2c_size = 256;
 int par2c_position = 0;
 int par2 = -1;
 
 int retval;
 
 for(i++;i<strlen(x);i++)
 {
  printf("%d x[%d] %c\n", state, i, x[i]);
  switch (state)
  {
   case 0:
    switch (x[i])
    {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(':
      i = recursive_lparen(x, i, 0,retval);
      break;
    case ')':
      return i;
      break;
    case 'p': state = 2; break;  // возможное начало функции
    case 'o': case 'w': case '+': case ',': case '/':  exit(0); break; // ошибка
    case 'x': state = 3; break; // название идентификатора
    default: exit(0); break; // ошибка
   }
   break;
  case 1: // состояние чтения числа
   switch (x[i])
   {
    case '0':  case '1':  case '2':  case '3':  case '4':  case '5':  case '6':  case '7':  case '8':  case '9':
      state = 1; // состояние чтения числа. При окончании чтения заносится в стек.
      buf[buf_position++] = x[i]; // заносим часть числа в буфер
      break;
    case '(':
     break;
    case ')':
      buf[buf_position++]='\0';
      par2 = atoi(buf);
      printf("par2: %d\n", par2);
      r = pow((double)par1, (double)par2);
      printf("r: %d\n", r);
      printf("i: %d\n", i);
      return i;
      //exit(0);
     break;
    case '+': i = recursive_plus(x, buf, i, 5,retval);
     break;
    case ',': exit(0); break; // ошибка
    case '/': i = recursive_del(x, buf, i, 5,retval);
     break;
    default: exit(0); break; // ошибка
   }
  break;
  case 2: // возможное название функции
   switch (x[i]) {
    case 'o': state = 4; break;
    default: exit(0); break; // ошибка (недопускающее состояние)
   }
   break;
  case 3: // состояние: прочитан идентификатор
   par1 = a.value;
   switch (x[i]) {
    case ',': state = 0; break;
    default: exit(0); break; // ошибка (недопускающее состояние)
   }
   break;
  case 4: // возможное название функции
   switch (x[i]) {
    case 'w': state = 5; break;
    default: exit(0); break; // ошибка
   }
   break;
  case 5: // состояние: прочитано название функции
   i = recursive_func(x, i, state,retval);
   break;
   }
 }
}
Shax_04
 Аватар для Shax_04
2 / 2 / 0
Регистрация: 02.11.2012
Сообщений: 20
24.11.2012, 03:10  [ТС]     Визуальное программирование. Считывание теста #6
Парень...ты просто гений.
HeroinHeart
0 / 0 / 0
Регистрация: 26.11.2012
Сообщений: 6
26.11.2012, 21:56     Визуальное программирование. Считывание теста #7
Цитата Сообщение от igorrr37 Посмотреть сообщение
в студии отключи юникод
main.cpp
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
#define _CRT_SECURE_NO_WARNINGS
#define _CRT_NON_CONFORMING_SWPRINTFS
#include <windows.h>
#include <stdlib.h>
#include <string>
#include <string.h>
#include <tchar.h>
#include <iostream>
#include "parser.h"
 
static TCHAR szWindowClass[] = _T("wndClass");
static TCHAR szTitle[] = _T("Calculator");
TCHAR buf[256];
TCHAR bufx[32];
 
HINSTANCE hInst;
 
LRESULT CALLBACK WndProc(HWND, UINT, WPARAM, LPARAM);
 
int WINAPI WinMain(HINSTANCE hInstance, HINSTANCE hPrevInstance,
                   LPSTR lpCmdLine, int nCmdShow)
{
 
    WNDCLASSEX wcex;
 
    wcex.cbSize = sizeof(WNDCLASSEX);
    wcex.style          = CS_HREDRAW | CS_VREDRAW;
    wcex.lpfnWndProc    = WndProc;
    wcex.cbClsExtra     = 0;
    wcex.cbWndExtra     = 0;
    wcex.hInstance      = hInstance;
    wcex.hIcon          = LoadIcon(hInstance, IDI_APPLICATION);
    wcex.hCursor        = LoadCursor(NULL, IDC_ARROW);
    wcex.hbrBackground  = (HBRUSH)(COLOR_WINDOW);
    wcex.lpszMenuName   = NULL;
    wcex.lpszClassName  = szWindowClass;
    wcex.hIconSm        = LoadIcon(wcex.hInstance, IDI_APPLICATION);
 
    if (!RegisterClassEx(&wcex))
    {
        MessageBox(NULL, _T("RegisterClassEx failed"), _T("Message"), 0);
        return __LINE__;
    }
 
    hInst = hInstance;
 
    HWND hWnd = CreateWindow(
        szWindowClass,
        szTitle,
        WS_SYSMENU,
        CW_USEDEFAULT, CW_USEDEFAULT,
        255, 220,
        NULL,
        NULL,
        hInstance,
        NULL
    );
 
    if (!hWnd)
    {
        MessageBox(NULL, _T("CreateWindow failed"), _T("Message"), 0);
        return __LINE__;
    }
 
    ShowWindow(hWnd,nCmdShow);
    UpdateWindow(hWnd);
 
   MSG msg;
    while (GetMessage(&msg, NULL, 0, 0))
    {
        TranslateMessage(&msg);
        DispatchMessage(&msg);
    }
 
    return (int) msg.wParam;
}
 
#define ID_EDIT_Fml  99
#define ID_EDIT_Val  99
#define ID_EDIT_Res  99
#define ID_BUTTON_GO    100
#define ID_BUTTON_C    101
 
LRESULT CALLBACK WndProc(HWND hWnd, UINT message, WPARAM wParam, LPARAM lParam)
{
 
    static HWND hButtonGo, hButtonC, hEditFml, hEditVal, hEditRes;
    PAINTSTRUCT ps;
    HDC hdc;
 
    switch (message)
    { // -2.5 + (-x) / (-x + 2)
        case WM_CREATE:
            hEditFml = CreateWindow(_T("edit"), _T(""), WS_CHILD | WS_VISIBLE | WS_BORDER | ES_RIGHT, 10, 5, 230, 35, hWnd, (HMENU)ID_EDIT_Fml, hInst, 0);
            hEditVal = CreateWindow(_T("edit"), _T(""), WS_CHILD | WS_VISIBLE | WS_BORDER | ES_RIGHT, 10, 45, 230, 35, hWnd, (HMENU)ID_EDIT_Val, hInst, 0);
            hEditRes = CreateWindow(_T("edit"), _T(""), WS_CHILD | WS_VISIBLE | WS_BORDER | ES_RIGHT, 10, 85, 230, 35, hWnd, (HMENU)ID_EDIT_Res, hInst, 0);
            hButtonGo = CreateWindow (_T("Button"), _T("go"), WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON,  10, 150, 80, 30, hWnd, (HMENU)ID_BUTTON_GO, hInst, 0);
            hButtonC = CreateWindow (_T("Button"), _T("clear"), WS_CHILD | WS_VISIBLE | BS_PUSHBUTTON,  100, 150, 80, 30, hWnd, (HMENU)ID_BUTTON_C, hInst, 0);
            break;
        case WM_COMMAND:
            if((LOWORD(wParam)==ID_BUTTON_GO)&&(HIWORD(wParam)==BN_CLICKED))
            {
                GetWindowText(hEditFml, buf, sizeof(buf));
                GetWindowText(hEditVal, bufx, sizeof(bufx));
                typedef std::basic_string<TCHAR> tstring;
                tstring s(buf), sx(bufx);
                if('-' == sx[0])
                    sx = tstring(_T("(")) + sx + tstring(_T(")"));
                tstring::size_type ind;
                while((ind = s.find(TEXT('x'))) != std::basic_string<TCHAR>::npos)
                {
                    s.replace(ind, 1, sx);
                }
                SetWindowText(hEditRes, s.c_str());
                TParser parser;
                static double x[10];
                parser.SetX((double *)&x);
                try
                {
                  // Evaluate expr.
                  parser.Compile(const_cast<char*>(s.c_str()));
                  parser.Evaluate();
                  _stprintf(buf, TEXT("%lf"), parser.GetResult());
                }
                catch(TError error)
                {
                  // Print error.
                  _stprintf(buf, TEXT("NAN"));
                }
                SetWindowText(hEditRes, buf);
            }
            else if((LOWORD(wParam)==ID_BUTTON_C)&&(HIWORD(wParam)==BN_CLICKED))
            {
                SetWindowText(hEditFml, _T(""));
                SetWindowText(hEditVal, _T(""));
                SetWindowText(hEditRes, _T(""));
            }
        case WM_PAINT:
            hdc = BeginPaint(hWnd, &ps);
            EndPaint(hWnd, &ps);
            break;
        case WM_DESTROY:
            PostQuitMessage(0);
            break;
        default:
            return DefWindowProc(hWnd, message, wParam, lParam);
            break;
    }
    return 0;
}

парсер из соседнего топика
parser.h
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
// main.cpp
// Содержит тестовую программу для модуля parser.cpp.
// Writen by Chaos Master, 17th of Febrary, 2000.
 
// Includes
#define M_PI             3.1415926535897932384626433832795
#include <cstring>
#include <iostream>
#include <cstdio>
// parser.cpp
// Этот файл содержит реализацию класса TParser,
// осуществляющего разбор заданного математического выражения.
// Written by Chaos Master, 11th of Febrary, 2000.
 
// Includes
//#include "stdafx.h"
#include <math.h>
// parser.h
// Этот файл содержит описание класса TParser,
// осуществляющего разбор заданного математического выражения.
// Written by Chaos Master, 11th of Febrary, 2000.
 
#if !defined(__SOLVER_H)
#define __SOLVER_H
 
// Includes
#include <string.h>
#include <vector>
using namespace std;
 
// Defines
#define MAX_EXPR_LEN   255
#define MAX_TOKEN_LEN  80
 
struct TParserNode
{
   double value;
   TParserNode *left;
   TParserNode *right;
 
   TParserNode(double _value=0.0, TParserNode *_left=NULL, TParserNode *_right=NULL)
      { value = _value; left = _left; right = _right; }
};
 
struct TError
{
   char *error;
   int pos;
 
   TError() {};
   TError(char *_error, int _pos) { error=_error; pos=_pos; }
};
 
class TParser
{
  private:
   TParserNode *root;
   char *expr;
   char curToken[MAX_TOKEN_LEN];
   enum { PARSER_PLUS, PARSER_MINUS, PARSER_MULTIPLY, PARSER_DIVIDE, PARSER_PERCENT, PARSER_POWER,
          PARSER_SIN, PARSER_COS, PARSER_TG, PARSER_CTG, PARSER_ARCSIN, PARSER_ARCCOS, PARSER_ARCTG, PARSER_ARCCTG, PARSER_SH, PARSER_CH, PARSER_TH, PARSER_CTH,
          PARSER_EXP, PARSER_LG, PARSER_LN, PARSER_SQRT, PARSER_X, PARSER_L_BRACKET, PARSER_R_BRACKET, PARSER_E, PARSER_PI, PARSER_NUMBER, PARSER_END } typToken;
   int pos;
 
   const double *x;
   double result;
 
   vector<TParserNode *> history;
 
  private:
   TParserNode *CreateNode(double _value=0.0, TParserNode *_left=NULL, TParserNode *_right=NULL);
 
   TParserNode *Expr(void);
   TParserNode *Expr1(void);
   TParserNode *Expr2(void);
   TParserNode *Expr3(void);
   TParserNode *Expr4(void);
   TParserNode *Expr5(void);
 
   bool GetToken(void);
   bool IsDelim(void) { return (strchr("+-*/%^()[]", expr[pos])!=NULL); }
   bool IsLetter(void) { return ((expr[pos]>='a' && expr[pos]<='z') ||
                                 (expr[pos]>='A' && expr[pos]<='Z')); }
   bool IsDigit(void) { return (expr[pos]>='0' && expr[pos]<='9'); }
   bool IsPoint(void) { return (expr[pos]=='.'); }
 
   double CalcTree(TParserNode *tree);
   void  DelTree(TParserNode *tree);
 
   void SendError(int errNum);
 
  public:
   TParser() { result = 0.0; x = NULL; root = NULL; }
   ~TParser() { DelTree(root); root=NULL; }
   void SetX(const double *_x) { x=_x; }
   //void SetY(double _y) { y=_y; }
 
   bool Compile(char *expr);
   void Decompile() { DelTree(root); root=NULL; }
 
   double Evaluate();
   double Evaluate(double *_x) { SetX(_x); return Evaluate(); }
   double Evaluate(double x, ...) { SetX(&x); return Evaluate(); }
 
   double GetResult(void) { return result; }
};
 
#endif
 
// Defines
// operations...
#define OP_PLUS          0
#define OP_MINUS         1
#define OP_MULTIPLY      2
#define OP_DIVIDE        3
#define OP_PERCENT       4
#define OP_POWER         5
#define OP_UMINUS        6
 
#define OP_SIN           10
#define OP_COS           11
#define OP_TG            12
#define OP_CTG           13
#define OP_ARCSIN        14
#define OP_ARCCOS        15
#define OP_ARCTG         16
#define OP_ARCCTG        17
#define OP_SH            18
#define OP_CH            19
#define OP_TH            20
#define OP_CTH           21
#define OP_EXP           22
#define OP_LG            23
#define OP_LN            24
#define OP_SQRT          25
#define OP_X             26
 
// PI...
 
 
// Member functions
TParserNode *TParser::CreateNode(double _value, TParserNode *_left, TParserNode *_right)
{
   TParserNode *pNode = new TParserNode(_value, _left, _right);
   history.push_back(pNode);
   return pNode;
}
 
void TParser::SendError(int errNum)
{
   static char const*errs[7] = { NULL,
                            NULL,
                            "Unexpected end of expression",
                            "End of expression expected",
                            "'(' or '[' expected",
                            "')' or ']' expected",
                            NULL
                         };
   static char buffer[80];
 
   int len = strlen(curToken);
 
   if(*curToken=='\0')
      strcpy(curToken, "EOL");
 
   switch(errNum)
   {
      case 0:
         sprintf(buffer, "Unknown keyword: '%s'", curToken);
         errs[0] = buffer;
         break;
 
      case 1:
         sprintf(buffer, "Unknown symbol: '%s'", curToken);
         errs[1] = buffer;
         break;
 
      case 6:
         sprintf(buffer, "Unexpected '%s'", curToken);
         errs[6] = buffer;
         break;
   }
 
   TError error(const_cast<char*>(errs[errNum]), pos-len);
 
   for(int i=0; i<history.size(); i++)
      delete history[i];
   history.clear();
 
   root = NULL;
 
   throw error;
 
   return;
}
 
bool TParser::GetToken(void)
{
   *curToken = '\0';
 
   while(expr[pos]==' ') pos++;
 
   if(expr[pos]=='\0')
   {
      curToken[0] = '\0';
      typToken = PARSER_END;
      return true;
   }
   else if(IsDelim())
   {
      curToken[0] = expr[pos++];
      curToken[1] = '\0';
      switch(*curToken)
      {
         case '+': typToken = PARSER_PLUS; return true;
         case '-': typToken = PARSER_MINUS; return true;
         case '*': typToken = PARSER_MULTIPLY; return true;
         case '/': typToken = PARSER_DIVIDE; return true;
         case '%': typToken = PARSER_PERCENT; return true;
         case '^': typToken = PARSER_POWER; return true;
         case '[':
         case '(': typToken = PARSER_L_BRACKET; return true;
         case ']':
         case ')': typToken = PARSER_R_BRACKET; return true;
      }
   }
   else if(IsLetter())
   {
      int i=0;
      while(IsLetter()) curToken[i++] = expr[pos++];
      curToken[i] = '\0';
 
      int len = strlen(curToken);
      for(i=0; i<len; i++)
         if(curToken[i]>='A' && curToken[i]<='Z')
            curToken[i] += 'a' - 'A';
 
      if(!strcmp(curToken, "x"))           { typToken = PARSER_X; return true; }
      else if(!strcmp(curToken, "pi"))     { typToken = PARSER_PI; return true; }
      else if(!strcmp(curToken, "e"))      { typToken = PARSER_E; return true; }
      else if(!strcmp(curToken, "sin"))    { typToken = PARSER_SIN; return true; }
      else if(!strcmp(curToken, "cos"))    { typToken = PARSER_COS; return true; }
      else if(!strcmp(curToken, "tg"))     { typToken = PARSER_TG; return true; }
      else if(!strcmp(curToken, "ctg"))    { typToken = PARSER_CTG; return true; }
      else if(!strcmp(curToken, "arcsin")) { typToken = PARSER_ARCSIN; return true; }
      else if(!strcmp(curToken, "arccos")) { typToken = PARSER_ARCCOS; return true; }
      else if(!strcmp(curToken, "arctg"))  { typToken = PARSER_ARCTG; return true; }
      else if(!strcmp(curToken, "arcctg")) { typToken = PARSER_ARCCTG; return true; }
      else if(!strcmp(curToken, "sh"))     { typToken = PARSER_SH; return true; }
      else if(!strcmp(curToken, "ch"))     { typToken = PARSER_CH; return true; }
      else if(!strcmp(curToken, "th"))     { typToken = PARSER_TH; return true; }
      else if(!strcmp(curToken, "cth"))    { typToken = PARSER_CTH; return true; }
      else if(!strcmp(curToken, "exp"))    { typToken = PARSER_EXP; return true; }
      else if(!strcmp(curToken, "lg"))     { typToken = PARSER_LG; return true; }
      else if(!strcmp(curToken, "ln"))     { typToken = PARSER_LN; return true; }
      else if(!strcmp(curToken, "sqrt"))   { typToken = PARSER_SQRT; return true; }
      else SendError(0);
   }
   else if(IsDigit() || IsPoint())
   {
      int i=0;
      while(IsDigit()) curToken[i++] = expr[pos++];
      if(IsPoint())
      {
         curToken[i++] = expr[pos++];
         while(IsDigit()) curToken[i++] = expr[pos++];
      }
      curToken[i] = '\0';
      typToken = PARSER_NUMBER;
      return true;
   }
   else
   {
      curToken[0] = expr[pos++];
      curToken[1] = '\0';
      SendError(1);
   }
 
   return false;
}
 
bool TParser::Compile(char *_expr)
{
   pos = 0;
   expr = _expr;
   *curToken = '\0';
   if(root!=NULL)
   {
      DelTree(root);
      root = NULL;
   }
 
   history.clear();
 
   GetToken();
   if(typToken==PARSER_END) SendError(2);
   root = Expr();
   if(typToken!=PARSER_END) SendError(3);
 
   history.clear();
 
   return true;
}
 
TParserNode *TParser::Expr(void)
{
   TParserNode *temp = Expr1();
 
   while(1)
   {
      if(typToken==PARSER_PLUS)
      {
         GetToken();
         temp = CreateNode(OP_PLUS, temp, Expr1());
      }
      else if(typToken==PARSER_MINUS)
      {
         GetToken();
         temp = CreateNode(OP_MINUS, temp, Expr1());
      }
      else break;
   }
 
   return temp;
}
 
TParserNode *TParser::Expr1(void)
{
   TParserNode *temp = Expr2();
 
   while(1)
   {
      if(typToken==PARSER_MULTIPLY)
      {
         GetToken();
         temp = CreateNode(OP_MULTIPLY, temp, Expr2());
      }
      else if(typToken==PARSER_DIVIDE)
      {
         GetToken();
         temp = CreateNode(OP_DIVIDE, temp, Expr2());
      }
      else if(typToken==PARSER_PERCENT)
      {
         GetToken();
         temp = CreateNode(OP_PERCENT, temp, Expr2());
      }
      else break;
   }
 
   return temp;
}
 
TParserNode *TParser::Expr2(void)
{
   TParserNode *temp = Expr3();
 
   while(1)
   {
      if(typToken==PARSER_POWER)
      {
         GetToken();
         temp = CreateNode(OP_POWER, temp, Expr2());
      }
      else break;
   }
 
   return temp;
}
 
TParserNode *TParser::Expr3(void)
{
   TParserNode *temp;
 
   if(typToken==PARSER_PLUS)
   {
      GetToken();
      temp = Expr4();
   }
   else if(typToken==PARSER_MINUS)
   {
      GetToken();
      temp = CreateNode(OP_UMINUS, Expr4());
   }
   else
      temp = Expr4();
 
   return temp;
}
 
TParserNode *TParser::Expr4(void)
{
   TParserNode *temp;
 
   if(typToken>=PARSER_SIN && typToken<=PARSER_X)
   {
      temp = CreateNode(OP_SIN-PARSER_SIN+typToken);
      GetToken();
      if(typToken!=PARSER_L_BRACKET) SendError(4);
      GetToken();
      temp->left = Expr();
      if(typToken!=PARSER_R_BRACKET) SendError(5);
      GetToken();
   }
   else
      temp = Expr5();
 
   return temp;
}
 
TParserNode *TParser::Expr5(void)
{
   TParserNode *temp = 0;
 
   switch(typToken)
   {
      case PARSER_NUMBER:
         temp = CreateNode((double)atof(curToken));
         GetToken();
         break;
 
      case PARSER_PI:
         temp = CreateNode((double)M_PI);
         GetToken();
         break;
 
      case PARSER_E:
         temp = CreateNode((double)exp(1));
         GetToken();
         break;
 
      case PARSER_L_BRACKET:
         GetToken();
         temp = Expr();
         if(typToken!=PARSER_R_BRACKET) SendError(5);
         GetToken();
         break;
 
      default:
         SendError(6);
   }
 
   return temp;
}
 
double TParser::Evaluate(void)
{
   result = CalcTree(root);
   return result;
}
 
double TParser::CalcTree(TParserNode *tree)
{
   static double temp;
 
   if(tree->left==NULL && tree->right==NULL)
      return tree->value;
   else
      switch((int)tree->value)
      {
         case OP_PLUS:
            return CalcTree(tree->left)+CalcTree(tree->right);
 
         case OP_MINUS:
            return CalcTree(tree->left)-CalcTree(tree->right);
 
         case OP_MULTIPLY:
            return CalcTree(tree->left)*CalcTree(tree->right);
 
         case OP_DIVIDE:
            return CalcTree(tree->left)/CalcTree(tree->right);
 
         case OP_PERCENT:
            return (int)CalcTree(tree->left)%(int)CalcTree(tree->right);
 
         case OP_POWER:
            return (double)pow(CalcTree(tree->left),CalcTree(tree->right));
 
         case OP_UMINUS:
            return -CalcTree(tree->left);
 
         case OP_SIN:
            return sin(CalcTree(tree->left));
 
         case OP_COS:
            return cos(CalcTree(tree->left));
 
         case OP_TG:
            return tan(CalcTree(tree->left));
 
         case OP_CTG:
            return 1.0/tan(CalcTree(tree->left));
 
         case OP_ARCSIN:
            return asin(CalcTree(tree->left));
 
         case OP_ARCCOS:
            return acos(CalcTree(tree->left));
 
         case OP_ARCTG:
            return atan(CalcTree(tree->left));
 
         case OP_ARCCTG:
            return M_PI/2.0-atan(CalcTree(tree->left));
 
         case OP_SH:
            temp = CalcTree(tree->left);
            return (exp(temp)-exp(-temp))/2.0;
 
         case OP_CH:
            temp = CalcTree(tree->left);
            return (exp(temp)+exp(-temp))/2.0;
 
         case OP_TH:
            temp = CalcTree(tree->left);
            return (exp(temp)-exp(-temp))/(exp(temp)+exp(-temp));
 
         case OP_CTH:
            temp = CalcTree(tree->left);
            return (exp(temp)+exp(-temp))/(exp(temp)-exp(-temp));
 
         case OP_EXP:
            return exp(CalcTree(tree->left));
 
         case OP_LG:
            return log10(CalcTree(tree->left));
 
         case OP_LN:
            return log(CalcTree(tree->left));
 
         case OP_SQRT:
            return sqrt(CalcTree(tree->left));
 
         case OP_X:
            return x[int(CalcTree(tree->left))];
      }
 
   return 0;
}
 
void TParser::DelTree(TParserNode *tree)
{
   if(tree==NULL) return;
 
   DelTree(tree->left);
   DelTree(tree->right);
 
   delete tree;
 
   return;
}
Уважаемый, подскажите пожалуйста, что собственно делать с этим кодом? Как с помощью него сделать готовую программу по считывания функции как я понял из ТекстБокса и вывода в текстБокс, да и расчет должен производится после нажатия определённой кнопки, еще и отдельно переменная икс вводится в еще одном ТестБоксе...
igorrr37
 Аватар для igorrr37
1593 / 1221 / 118
Регистрация: 21.12.2010
Сообщений: 1,868
Записей в блоге: 7
28.11.2012, 08:18     Визуальное программирование. Считывание теста #8
проверял в vs12 и в codeblocks. Создаётся проект win32, туда копируется код main.cpp и к проекту add item parser.h
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
case '+': typToken = PARSER_PLUS; return true;
         case '-': typToken = PARSER_MINUS; return true;
         case '*': typToken = PARSER_MULTIPLY; return true;
         case '/': typToken = PARSER_DIVIDE; return true;
         case '%': typToken = PARSER_PERCENT; return true;
         case '^': typToken = PARSER_POWER; return true;
         case '[':
         case '(': typToken = PARSER_L_BRACKET; return true;
         case ']':
         case ')': typToken = PARSER_R_BRACKET; return true;
 
      if(!strcmp(curToken, "x"))           { typToken = PARSER_X; return true; }
      else if(!strcmp(curToken, "pi"))     { typToken = PARSER_PI; return true; }
      else if(!strcmp(curToken, "e"))      { typToken = PARSER_E; return true; }
      else if(!strcmp(curToken, "sin"))    { typToken = PARSER_SIN; return true; }
      else if(!strcmp(curToken, "cos"))    { typToken = PARSER_COS; return true; }
      else if(!strcmp(curToken, "tg"))     { typToken = PARSER_TG; return true; }
      else if(!strcmp(curToken, "ctg"))    { typToken = PARSER_CTG; return true; }
      else if(!strcmp(curToken, "arcsin")) { typToken = PARSER_ARCSIN; return true; }
      else if(!strcmp(curToken, "arccos")) { typToken = PARSER_ARCCOS; return true; }
      else if(!strcmp(curToken, "arctg"))  { typToken = PARSER_ARCTG; return true; }
      else if(!strcmp(curToken, "arcctg")) { typToken = PARSER_ARCCTG; return true; }
      else if(!strcmp(curToken, "sh"))     { typToken = PARSER_SH; return true; }
      else if(!strcmp(curToken, "ch"))     { typToken = PARSER_CH; return true; }
      else if(!strcmp(curToken, "th"))     { typToken = PARSER_TH; return true; }
      else if(!strcmp(curToken, "cth"))    { typToken = PARSER_CTH; return true; }
      else if(!strcmp(curToken, "exp"))    { typToken = PARSER_EXP; return true; }
      else if(!strcmp(curToken, "lg"))     { typToken = PARSER_LG; return true; }
      else if(!strcmp(curToken, "ln"))     { typToken = PARSER_LN; return true; }
      else if(!strcmp(curToken, "sqrt"))   { typToken = PARSER_SQRT; return true; }
Миниатюры
Визуальное программирование. Считывание теста  
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
01.12.2012, 05:11     Визуальное программирование. Считывание теста
Еще ссылки по теме:

Очередное, из теста C++
Создание теста C++
C++ Визуальное программирование. Метод деления отрезка пополам

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
Shax_04
 Аватар для Shax_04
2 / 2 / 0
Регистрация: 02.11.2012
Сообщений: 20
01.12.2012, 05:11  [ТС]     Визуальное программирование. Считывание теста #9
Цитата Сообщение от igorrr37 Посмотреть сообщение
проверял в vs12 и в codeblocks. Создаётся проект win32, туда копируется код main.cpp и к проекту add item parser.h
Кликните здесь для просмотра всего текста
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
case '+': typToken = PARSER_PLUS; return true;
         case '-': typToken = PARSER_MINUS; return true;
         case '*': typToken = PARSER_MULTIPLY; return true;
         case '/': typToken = PARSER_DIVIDE; return true;
         case '%': typToken = PARSER_PERCENT; return true;
         case '^': typToken = PARSER_POWER; return true;
         case '[':
         case '(': typToken = PARSER_L_BRACKET; return true;
         case ']':
         case ')': typToken = PARSER_R_BRACKET; return true;
 
      if(!strcmp(curToken, "x"))           { typToken = PARSER_X; return true; }
      else if(!strcmp(curToken, "pi"))     { typToken = PARSER_PI; return true; }
      else if(!strcmp(curToken, "e"))      { typToken = PARSER_E; return true; }
      else if(!strcmp(curToken, "sin"))    { typToken = PARSER_SIN; return true; }
      else if(!strcmp(curToken, "cos"))    { typToken = PARSER_COS; return true; }
      else if(!strcmp(curToken, "tg"))     { typToken = PARSER_TG; return true; }
      else if(!strcmp(curToken, "ctg"))    { typToken = PARSER_CTG; return true; }
      else if(!strcmp(curToken, "arcsin")) { typToken = PARSER_ARCSIN; return true; }
      else if(!strcmp(curToken, "arccos")) { typToken = PARSER_ARCCOS; return true; }
      else if(!strcmp(curToken, "arctg"))  { typToken = PARSER_ARCTG; return true; }
      else if(!strcmp(curToken, "arcctg")) { typToken = PARSER_ARCCTG; return true; }
      else if(!strcmp(curToken, "sh"))     { typToken = PARSER_SH; return true; }
      else if(!strcmp(curToken, "ch"))     { typToken = PARSER_CH; return true; }
      else if(!strcmp(curToken, "th"))     { typToken = PARSER_TH; return true; }
      else if(!strcmp(curToken, "cth"))    { typToken = PARSER_CTH; return true; }
      else if(!strcmp(curToken, "exp"))    { typToken = PARSER_EXP; return true; }
      else if(!strcmp(curToken, "lg"))     { typToken = PARSER_LG; return true; }
      else if(!strcmp(curToken, "ln"))     { typToken = PARSER_LN; return true; }
      else if(!strcmp(curToken, "sqrt"))   { typToken = PARSER_SQRT; return true; }
Программа работает, спасибо!
Но есть одно маленькое но.
Если все поля пустые и жмёшь "go" , то программа крашится! Ка этого избежать, чтобы также выбивало (NAN)?
Yandex
Объявления
01.12.2012, 05:11     Визуальное программирование. Считывание теста
Ответ Создать тему
Опции темы

Текущее время: 07:18. Часовой пояс GMT +3.
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2016, vBulletin Solutions, Inc.
Рейтинг@Mail.ru