Guest User

Untitled

a guest
Jul 20th, 2018
69
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
C 19.42 KB | None | 0 0
  1. #include<stdio.h>
  2. #include<math.h>
  3.  
  4. float global=0;
  5.  
  6. int interface(float numero)
  7. {
  8.     int z, tam;
  9.     char estrutura[31][39], linha, coluna, quebraLinha=0, x, y, strGlobal[20];
  10.     for(linha=0 ; linha<=30 ; linha++)
  11.     {
  12.         for(coluna=0 ; coluna<=38 ; coluna++)
  13.         {
  14.             estrutura[linha][coluna]=255;
  15.         }
  16.     }
  17.     estrutura[0][0]=201;
  18.     estrutura[0][38]=187;
  19.     estrutura[30][0]=200;
  20.     estrutura[30][38]=188;
  21.     /*Primeira e ultima linha*/
  22.     for(linha=0 ; linha<=30 ; linha++)
  23.     {
  24.         if(linha==0 || linha==30)
  25.         {
  26.             for(coluna=1 ; coluna<=37 ; coluna++)
  27.             {
  28.                 if(coluna==0 || coluna==38)
  29.                 {
  30.                     estrutura[linha][coluna]=186;
  31.                 }
  32.                 estrutura[linha][coluna]=205;
  33.             }
  34.         }
  35.  
  36.     }
  37.     /*Primeira e ultima coluna*/
  38.     for(linha=1 ; linha<=29 ; linha++)
  39.     {
  40.         for(coluna=0 ; coluna<=38 ; coluna++)
  41.         {
  42.            if(coluna==0 || coluna==38)
  43.            {
  44.                estrutura[linha][coluna]=186;
  45.            }
  46.         }
  47.     }
  48.     /*Retangulo onde ocorre as operações*/
  49.     sprintf(strGlobal,"%0.3f", numero);
  50.     tam=strlen(strGlobal);
  51.     z=tam;
  52.     for(linha=1 ; linha<=4 ; linha++)
  53.     {
  54.         if(linha==3)
  55.         {
  56.             for(coluna=35 ; coluna>=3 ; coluna--)
  57.             {
  58.                 estrutura[linha][coluna]=strGlobal[z];
  59.                 z--;
  60.                 if(z<0)break;
  61.             }
  62.         }
  63.         if(linha==1 || linha==4)
  64.         {
  65.             for(coluna=2 ; coluna<=36 ; coluna++)
  66.             {
  67.                 if(quebraLinha==37)
  68.                 {
  69.                     printf("\n");
  70.                     quebraLinha=0;
  71.                 }
  72.                 estrutura[linha][coluna]=196;
  73.                 quebraLinha++;
  74.             }
  75.         }
  76.         else
  77.         {
  78.             for(coluna=2 ; coluna<=36 ; coluna++)
  79.             {
  80.                 if(coluna==2 || coluna==36)
  81.                 {
  82.                     estrutura[linha][coluna]=179;
  83.                     quebraLinha++;
  84.                 }
  85.             }
  86.         }
  87.     }
  88.     estrutura[1][2]=218;
  89.     estrutura[1][36]=191;
  90.     estrutura[4][2]=192;
  91.     estrutura[4][36]=217;
  92.     /*fim do retângulo*/
  93.     /*Botoes*/
  94.     /* c1=201;c2=196;c3=187;
  95.        c4=179;c5=48;c6=179;
  96.        c7=200;c8=196;c9=188;   */
  97.     /* B: 1 */
  98.     estrutura[6][2]=201;estrutura[6][3]=196;estrutura[6][4]=196;estrutura[6][5]=196;estrutura[6][6]=187;
  99.     estrutura[7][2]=179;estrutura[7][3]=255;estrutura[7][4]=255;estrutura[7][5]=255;estrutura[7][6]=179;
  100.     estrutura[8][2]=179;estrutura[8][3]=255;estrutura[8][4]=49;estrutura[8][5]=255;estrutura[8][6]=179;
  101.     estrutura[9][2]=179;estrutura[9][3]=255;estrutura[9][4]=255;estrutura[9][5]=255;estrutura[9][6]=179;
  102.     estrutura[10][2]=200;estrutura[10][3]=196;estrutura[10][4]=196;estrutura[10][5]=196;estrutura[10][6]=188;
  103.     /* B: 4 */
  104.     estrutura[12][2]=201;estrutura[12][3]=196;estrutura[12][4]=196;estrutura[12][5]=196;estrutura[12][6]=187;
  105.     estrutura[13][2]=179;estrutura[13][3]=255;estrutura[13][4]=255;estrutura[13][5]=255;estrutura[13][6]=179;
  106.     estrutura[14][2]=179;estrutura[14][3]=255;estrutura[14][4]=52;estrutura[14][5]=255;estrutura[14][6]=179;
  107.     estrutura[15][2]=179;estrutura[15][3]=255;estrutura[15][4]=255;estrutura[15][5]=255;estrutura[15][6]=179;
  108.     estrutura[16][2]=200;estrutura[16][3]=196;estrutura[16][4]=196;estrutura[16][5]=196;estrutura[16][6]=188;
  109.     /* B: 7 */
  110.     estrutura[18][2]=201;estrutura[18][3]=196;estrutura[18][4]=196;estrutura[18][5]=196;estrutura[18][6]=187;
  111.     estrutura[19][2]=179;estrutura[19][3]=255;estrutura[19][4]=255;estrutura[19][5]=255;estrutura[19][6]=179;
  112.     estrutura[20][2]=179;estrutura[20][3]=255;estrutura[20][4]=55;estrutura[20][5]=255;estrutura[20][6]=179;
  113.     estrutura[21][2]=179;estrutura[21][3]=255;estrutura[21][4]=255;estrutura[21][5]=255;estrutura[21][6]=179;
  114.     estrutura[22][2]=200;estrutura[22][3]=196;estrutura[22][4]=196;estrutura[22][5]=196;estrutura[22][6]=188;
  115.     /* B: 2 */
  116.     estrutura[6][8]=201;estrutura[6][9]=196;estrutura[6][10]=196;estrutura[6][11]=196;estrutura[6][12]=187;
  117.     estrutura[7][8]=179;estrutura[7][9]=255;estrutura[7][10]=255;estrutura[7][11]=255;estrutura[7][12]=179;
  118.     estrutura[8][8]=179;estrutura[8][9]=255;estrutura[8][10]=50;estrutura[8][11]=255;estrutura[8][12]=179;
  119.     estrutura[9][8]=179;estrutura[9][9]=255;estrutura[9][10]=255;estrutura[9][11]=255;estrutura[9][12]=179;
  120.     estrutura[10][8]=200;estrutura[10][9]=196;estrutura[10][10]=196;estrutura[10][11]=196;estrutura[10][12]=188;
  121.     /* B: 5 */
  122.     estrutura[12][8]=201;estrutura[12][9]=196;estrutura[12][10]=196;estrutura[12][11]=196;estrutura[12][12]=187;
  123.     estrutura[13][8]=179;estrutura[13][9]=255;estrutura[13][10]=255;estrutura[13][11]=255;estrutura[13][12]=179;
  124.     estrutura[14][8]=179;estrutura[14][9]=255;estrutura[14][10]=53;estrutura[14][11]=255;estrutura[14][12]=179;
  125.     estrutura[15][8]=179;estrutura[15][9]=255;estrutura[15][10]=255;estrutura[15][11]=255;estrutura[15][12]=179;
  126.     estrutura[16][8]=200;estrutura[16][9]=196;estrutura[16][10]=196;estrutura[16][11]=196;estrutura[16][12]=188;
  127.     /* B: 8 */
  128.     estrutura[18][8]=201;estrutura[18][9]=196;estrutura[18][10]=196;estrutura[18][11]=196;estrutura[18][12]=187;
  129.     estrutura[19][8]=179;estrutura[19][9]=255;estrutura[19][10]=255;estrutura[19][11]=255;estrutura[19][12]=179;
  130.     estrutura[20][8]=179;estrutura[20][9]=255;estrutura[20][10]=56;estrutura[20][11]=255;estrutura[20][12]=179;
  131.     estrutura[21][8]=179;estrutura[21][9]=255;estrutura[21][10]=255;estrutura[21][11]=255;estrutura[21][12]=179;
  132.     estrutura[22][8]=200;estrutura[22][9]=196;estrutura[22][10]=196;estrutura[22][11]=196;estrutura[22][12]=188;
  133.     /* B: 3 */
  134.     estrutura[6][14]=201;estrutura[6][15]=196;estrutura[6][16]=196;estrutura[6][17]=196;estrutura[6][18]=187;
  135.     estrutura[7][14]=179;estrutura[7][15]=255;estrutura[7][16]=255;estrutura[7][17]=255;estrutura[7][18]=179;
  136.     estrutura[8][14]=179;estrutura[8][15]=255;estrutura[8][16]=51;estrutura[8][17]=255;estrutura[8][18]=179;
  137.     estrutura[9][14]=179;estrutura[9][15]=255;estrutura[9][16]=255;estrutura[9][17]=255;estrutura[9][18]=179;
  138.     estrutura[10][14]=200;estrutura[10][15]=196;estrutura[10][16]=196;estrutura[10][17]=196;estrutura[10][18]=188;
  139.     /* B: 6 */
  140.     estrutura[12][14]=201;estrutura[12][15]=196;estrutura[12][16]=196;estrutura[12][17]=196;estrutura[12][18]=187;
  141.     estrutura[13][14]=179;estrutura[13][15]=255;estrutura[13][16]=255;estrutura[13][17]=255;estrutura[13][18]=179;
  142.     estrutura[14][14]=179;estrutura[14][15]=255;estrutura[14][16]=54;estrutura[14][17]=255;estrutura[14][18]=179;
  143.     estrutura[15][14]=179;estrutura[15][15]=255;estrutura[15][16]=255;estrutura[15][17]=255;estrutura[15][18]=179;
  144.     estrutura[16][14]=200;estrutura[16][15]=196;estrutura[16][16]=196;estrutura[16][17]=196;estrutura[16][18]=188;
  145.     /* B: 9 */
  146.     estrutura[18][14]=201;estrutura[18][15]=196;estrutura[18][16]=196;estrutura[18][17]=196;estrutura[18][18]=187;
  147.     estrutura[19][14]=179;estrutura[19][15]=255;estrutura[19][16]=255;estrutura[19][17]=255;estrutura[19][18]=179;
  148.     estrutura[20][14]=179;estrutura[20][15]=255;estrutura[20][16]=57;estrutura[20][17]=255;estrutura[20][18]=179;
  149.     estrutura[21][14]=179;estrutura[21][15]=255;estrutura[21][16]=255;estrutura[21][17]=255;estrutura[21][18]=179;
  150.     estrutura[22][14]=200;estrutura[22][15]=196;estrutura[22][16]=196;estrutura[22][17]=196;estrutura[22][18]=188;
  151.     /* B: p */
  152.     estrutura[6][20]=201;estrutura[6][21]=196;estrutura[6][22]=196;estrutura[6][23]=196;estrutura[6][24]=187;
  153.     estrutura[7][20]=179;estrutura[7][21]=255;estrutura[7][22]=255;estrutura[7][23]=255;estrutura[7][24]=179;
  154.     estrutura[8][20]=179;estrutura[8][21]=255;estrutura[8][22]=112;estrutura[8][23]=255;estrutura[8][24]=179;
  155.     estrutura[9][20]=179;estrutura[9][21]=255;estrutura[9][22]=255;estrutura[9][23]=255;estrutura[9][24]=179;
  156.     estrutura[10][20]=200;estrutura[10][21]=196;estrutura[10][22]=196;estrutura[10][23]=196;estrutura[10][24]=188;
  157.     /* B: * */
  158.     estrutura[12][20]=201;estrutura[12][21]=196;estrutura[12][22]=196;estrutura[12][23]=196;estrutura[12][24]=187;
  159.     estrutura[13][20]=179;estrutura[13][21]=255;estrutura[13][22]=255;estrutura[13][23]=255;estrutura[13][24]=179;
  160.     estrutura[14][20]=179;estrutura[14][21]=255;estrutura[14][22]=42;estrutura[14][23]=255;estrutura[14][24]=179;
  161.     estrutura[15][20]=179;estrutura[15][21]=255;estrutura[15][22]=255;estrutura[15][23]=255;estrutura[15][24]=179;
  162.     estrutura[16][20]=200;estrutura[16][21]=196;estrutura[16][22]=196;estrutura[16][23]=196;estrutura[16][24]=188;
  163.     /* B: - */
  164.     estrutura[18][20]=201;estrutura[18][21]=196;estrutura[18][22]=196;estrutura[18][23]=196;estrutura[18][24]=187;
  165.     estrutura[19][20]=179;estrutura[19][21]=255;estrutura[19][22]=255;estrutura[19][23]=255;estrutura[19][24]=179;
  166.     estrutura[20][20]=179;estrutura[20][21]=255;estrutura[20][22]=240;estrutura[20][23]=255;estrutura[20][24]=179;
  167.     estrutura[21][20]=179;estrutura[21][21]=255;estrutura[21][22]=255;estrutura[21][23]=255;estrutura[21][24]=179;
  168.     estrutura[22][20]=200;estrutura[22][21]=196;estrutura[22][22]=196;estrutura[22][23]=196;estrutura[22][24]=188;
  169.     /* B: r */
  170.     estrutura[6][26]=201;estrutura[6][27]=196;estrutura[6][28]=196;estrutura[6][29]=196;estrutura[6][30]=187;
  171.     estrutura[7][26]=179;estrutura[7][27]=255;estrutura[7][28]=255;estrutura[7][29]=255;estrutura[7][30]=179;
  172.     estrutura[8][26]=179;estrutura[8][27]=255;estrutura[8][28]=114;estrutura[8][29]=255;estrutura[8][30]=179;
  173.     estrutura[9][26]=179;estrutura[9][27]=255;estrutura[9][28]=255;estrutura[9][29]=255;estrutura[9][30]=179;
  174.     estrutura[10][26]=200;estrutura[10][27]=196;estrutura[10][28]=196;estrutura[10][29]=196;estrutura[10][30]=188;
  175.     /* B: / */
  176.     estrutura[12][26]=201;estrutura[12][27]=196;estrutura[12][28]=196;estrutura[12][29]=196;estrutura[12][30]=187;
  177.     estrutura[13][26]=179;estrutura[13][27]=255;estrutura[13][28]=255;estrutura[13][29]=255;estrutura[13][30]=179;
  178.     estrutura[14][26]=179;estrutura[14][27]=255;estrutura[14][28]=47;estrutura[14][29]=255;estrutura[14][30]=179;
  179.     estrutura[15][26]=179;estrutura[15][27]=255;estrutura[15][28]=255;estrutura[15][29]=255;estrutura[15][30]=179;
  180.     estrutura[16][26]=200;estrutura[16][27]=196;estrutura[16][28]=196;estrutura[16][29]=196;estrutura[16][30]=188;
  181.     /* B: s */
  182.     estrutura[18][26]=201;estrutura[18][27]=196;estrutura[18][28]=196;estrutura[18][29]=196;estrutura[18][30]=187;
  183.     estrutura[19][26]=179;estrutura[19][27]=255;estrutura[19][28]=255;estrutura[19][29]=255;estrutura[19][30]=179;
  184.     estrutura[20][26]=179;estrutura[20][27]=255;estrutura[20][28]=115;estrutura[20][29]=255;estrutura[20][30]=179;
  185.     estrutura[21][26]=179;estrutura[21][27]=255;estrutura[21][28]=255;estrutura[21][29]=255;estrutura[21][30]=179;
  186.     estrutura[22][26]=200;estrutura[22][27]=196;estrutura[22][28]=196;estrutura[22][29]=196;estrutura[22][30]=188;
  187.     /* B: l */
  188.     estrutura[6][32]=201;estrutura[6][33]=196;estrutura[6][34]=196;estrutura[6][35]=196;estrutura[6][36]=187;
  189.     estrutura[7][32]=179;estrutura[7][33]=255;estrutura[7][34]=255;estrutura[7][35]=255;estrutura[7][36]=179;
  190.     estrutura[8][32]=179;estrutura[8][33]=255;estrutura[8][34]=108;estrutura[8][35]=255;estrutura[8][36]=179;
  191.     estrutura[9][32]=179;estrutura[9][33]=255;estrutura[9][34]=255;estrutura[9][35]=255;estrutura[9][36]=179;
  192.     estrutura[10][32]=200;estrutura[10][33]=196;estrutura[10][34]=196;estrutura[10][35]=196;estrutura[10][36]=188;
  193.     /* B: t */
  194.     estrutura[12][32]=201;estrutura[12][33]=196;estrutura[12][34]=196;estrutura[12][35]=196;estrutura[12][36]=187;
  195.     estrutura[13][32]=179;estrutura[13][33]=255;estrutura[13][34]=255;estrutura[13][35]=255;estrutura[13][36]=179;
  196.     estrutura[14][32]=179;estrutura[14][33]=255;estrutura[14][34]=116;estrutura[14][35]=255;estrutura[14][36]=179;
  197.     estrutura[15][32]=179;estrutura[15][33]=255;estrutura[15][34]=255;estrutura[15][35]=255;estrutura[15][36]=179;
  198.     estrutura[16][32]=200;estrutura[16][33]=196;estrutura[16][34]=196;estrutura[16][35]=196;estrutura[16][36]=188;
  199.     /* B: c */
  200.     estrutura[18][32]=201;estrutura[18][33]=196;estrutura[18][34]=196;estrutura[18][35]=196;estrutura[18][36]=187;
  201.     estrutura[19][32]=179;estrutura[19][33]=255;estrutura[19][34]=255;estrutura[19][35]=255;estrutura[19][36]=179;
  202.     estrutura[20][32]=179;estrutura[20][33]=255;estrutura[20][34]=99;estrutura[20][35]=255;estrutura[20][36]=179;
  203.     estrutura[21][32]=179;estrutura[21][33]=255;estrutura[21][34]=255;estrutura[21][35]=255;estrutura[21][36]=179;
  204.     estrutura[22][32]=200;estrutura[22][33]=196;estrutura[22][34]=196;estrutura[22][35]=196;estrutura[22][36]=188;
  205.     /* B : 0 */
  206.     estrutura[24][2]=201;estrutura[24][3]=196;estrutura[24][4]=196;estrutura[24][5]=196;estrutura[24][6]=196;estrutura[24][7]=196;estrutura[24][8]=196;estrutura[24][9]=196;estrutura[24][10]=196;estrutura[24][11]=196;estrutura[24][12]=187;
  207.     estrutura[25][2]=179;estrutura[25][3]=255;estrutura[25][4]=255;estrutura[25][5]=255;estrutura[25][6]=255;estrutura[25][7]=255;estrutura[25][8]=255;estrutura[25][9]=255;estrutura[25][10]=255;estrutura[25][11]=255;estrutura[25][12]=179;
  208.     estrutura[26][2]=179;estrutura[26][3]=255;estrutura[26][4]=255;estrutura[26][5]=255;estrutura[26][6]=255;estrutura[26][7]='0';estrutura[26][8]=255;estrutura[26][9]=255;estrutura[26][10]=255;estrutura[26][11]=255;estrutura[26][12]=179;
  209.     estrutura[27][2]=179;estrutura[27][3]=255;estrutura[27][4]=255;estrutura[27][5]=255;estrutura[27][6]=255;estrutura[27][7]=255;estrutura[27][8]=255;estrutura[27][9]=255;estrutura[27][10]=255;estrutura[27][11]=255;estrutura[27][12]=179;
  210.     estrutura[28][2]=200;estrutura[28][3]=196;estrutura[28][4]=196;estrutura[28][5]=196;estrutura[28][6]=196;estrutura[28][7]=196;estrutura[28][8]=196;estrutura[28][9]=196;estrutura[28][10]=196;estrutura[28][11]=196;estrutura[28][12]=188;
  211.     /* B : , */
  212.     estrutura[24][14]=201;estrutura[24][15]=196;estrutura[24][16]=196;estrutura[24][17]=196;estrutura[24][18]=187;
  213.     estrutura[25][14]=179;estrutura[25][15]=255;estrutura[25][16]=255;estrutura[25][17]=255;estrutura[25][18]=179;
  214.     estrutura[26][14]=179;estrutura[26][15]=255;estrutura[26][16]=',';estrutura[26][17]=255;estrutura[26][18]=179;
  215.     estrutura[27][14]=179;estrutura[27][15]=255;estrutura[27][16]=255;estrutura[27][17]=255;estrutura[27][18]=179;
  216.     estrutura[28][14]=200;estrutura[28][15]=196;estrutura[28][16]=196;estrutura[28][17]=196;estrutura[28][18]=188;
  217.     /* B : + */
  218.     estrutura[24][20]=201;estrutura[24][21]=196;estrutura[24][22]=196;estrutura[24][23]=196;estrutura[24][24]=187;
  219.     estrutura[25][20]=179;estrutura[25][21]=255;estrutura[25][22]=255;estrutura[25][23]=255;estrutura[25][24]=179;
  220.     estrutura[26][20]=179;estrutura[26][21]=255;estrutura[26][22]='+';estrutura[26][23]=255;estrutura[26][24]=179;
  221.     estrutura[27][20]=179;estrutura[27][21]=255;estrutura[27][22]=255;estrutura[27][23]=255;estrutura[27][24]=179;
  222.     estrutura[28][20]=200;estrutura[28][21]=196;estrutura[28][22]=196;estrutura[28][23]=196;estrutura[28][24]=188;
  223.     /* B : = */
  224.     estrutura[24][26]=201;estrutura[24][27]=196;estrutura[24][28]=196;estrutura[24][29]=196;estrutura[24][30]=196;estrutura[24][31]=196;estrutura[24][32]=196;estrutura[24][33]=196;estrutura[24][34]=196;estrutura[24][35]=196;estrutura[24][36]=187;
  225.     estrutura[25][26]=179;estrutura[25][27]=255;estrutura[25][28]=255;estrutura[25][29]=255;estrutura[25][30]=255;estrutura[25][31]=255;estrutura[25][32]=255;estrutura[25][33]=255;estrutura[25][34]=255;estrutura[25][35]=255;estrutura[25][36]=179;
  226.     estrutura[26][26]=179;estrutura[26][27]=255;estrutura[26][28]=255;estrutura[26][29]=255;estrutura[26][30]=255;estrutura[26][31]='=';estrutura[26][32]=255;estrutura[26][33]=255;estrutura[26][34]=255;estrutura[26][35]=255;estrutura[26][36]=179;
  227.     estrutura[27][26]=179;estrutura[27][27]=255;estrutura[27][28]=255;estrutura[27][29]=255;estrutura[27][30]=255;estrutura[27][31]=255;estrutura[27][32]=255;estrutura[27][33]=255;estrutura[27][34]=255;estrutura[27][35]=255;estrutura[27][36]=179;
  228.     estrutura[28][26]=200;estrutura[28][27]=196;estrutura[28][28]=196;estrutura[28][29]=196;estrutura[28][30]=196;estrutura[28][31]=196;estrutura[28][32]=196;estrutura[28][33]=196;estrutura[28][34]=196;estrutura[28][35]=196;estrutura[28][36]=188;
  229.  
  230.     quebraLinha=0;
  231.     /*Impressão completa da matriz*/
  232.     for(linha=0 ; linha<=30 ; linha++)
  233.     {
  234.         for(coluna=0 ; coluna<=38 ; coluna++)
  235.         {
  236.             if(quebraLinha==39)
  237.             {
  238.                 printf("\n");
  239.                 quebraLinha=0;
  240.             }
  241.             printf("%c", estrutura[linha][coluna]);
  242.             quebraLinha++;
  243.         }
  244.     }
  245.     void;
  246. }
  247.  
  248. float soma()
  249. {
  250.     float b;
  251.     scanf("%f", &b);
  252.     global+=b;
  253.     return global;
  254. }
  255.  
  256. int subtracao()
  257. {
  258.     float  d;
  259.     scanf("%f", &d);
  260.     global-=d;
  261.     return global;
  262. }
  263.  
  264. int multiplicacao()
  265. {
  266.     float  f;
  267.     scanf("%f", &f);
  268.     global*=f;
  269.     return global;
  270. }
  271.  
  272. int divisao()
  273. {
  274.     float  h;
  275.     scanf("%f", &h);
  276.     global/=h;
  277.     return global;
  278. }
  279.  
  280. int raiz()
  281. {
  282.     global=sqrt(global);
  283.     return global;
  284. }
  285.  
  286. int potencia()
  287. {
  288.     float exp;
  289.     scanf("%f", &exp);
  290.     global=pow(global,exp);
  291.     return global;
  292. }
  293. int logaritmo()
  294. {
  295.     global=log10f(global);
  296.     return global;
  297. }
  298. int seno()
  299. {
  300.     global=sin(global);
  301.     return global;
  302. }
  303. int cose()
  304. {
  305.     global=cos(global);
  306.     return global;
  307. }
  308. int tang()
  309. {
  310.     global=tan(global);
  311.     return global;
  312. }
  313.  
  314. int main()
  315. {
  316.     int i=0, g;
  317.     float aux;
  318.     char operador[100];
  319.     g=1;
  320.     while(1)
  321.     {
  322.         result:
  323.         aux=global;
  324.         system("CLS");
  325.         interface((float) global);
  326.         printf("NUMEROOOOOOOO: %f\n", aux);
  327.         printf("Expressao= ");
  328.         if(g==1)scanf(" %f", &global);
  329.         g++;
  330.         jump:
  331.         reglobal:
  332.         scanf("%c", &operador[i]);
  333.         if(operador[i]=='\n')
  334.         {
  335.             i=0;
  336.             operador[0]=0;
  337.             operador[1]=0;
  338.             operador[2]=0;
  339.             operador[3]=0;
  340.             operador[4]=0;
  341.             operador[5]=0;
  342.             goto result;
  343.         }
  344.         if(operador[i]=='+')
  345.         {
  346.             soma(global);
  347.             i=0;
  348.             goto jump;
  349.         }
  350.         if(operador[i]=='-')
  351.         {
  352.             subtracao(global);
  353.             i=0;
  354.             goto jump;
  355.         }
  356.         if(operador[i]=='*')
  357.         {
  358.             multiplicacao(global);
  359.             i=0;
  360.             goto jump;
  361.         }
  362.  
  363.         if(operador[i]=='/')
  364.         {
  365.             divisao(global);
  366.             i=0;
  367.             goto jump;
  368.         }
  369.         if(operador[i]=='r')
  370.         {
  371.             raiz(global);
  372.             i=0;
  373.             goto jump;
  374.         }
  375.  
  376.         if(operador[i]=='p')
  377.         {
  378.             potencia(global);
  379.             i=0;
  380.             goto jump;
  381.         }
  382.         if(operador[i]=='l')
  383.         {
  384.             logaritmo(global);
  385.             i=0;
  386.             goto jump;
  387.         }
  388.         if(operador[i]=='s')
  389.         {
  390.             seno(global);
  391.             i=0;
  392.             goto jump;
  393.         }
  394.         if(operador[i]=='c')
  395.         {
  396.             cose(global);
  397.             i=0;
  398.             goto jump;
  399.         }
  400.         if(operador[i]=='t')
  401.         {
  402.             tang(global);
  403.             i=0;
  404.             goto jump;
  405.         }
  406.         else
  407.         {
  408.             global=atoi(operador);
  409.             i++;
  410.             goto reglobal;
  411.         }
  412.     }
  413.     return 0;
  414. }
Add Comment
Please, Sign In to add comment