Advertisement
tautas

simuko

Dec 28th, 2015
126
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 3.24 KB | None | 0 0
  1. #include <iostream>
  2. #include <iomanip>
  3. #include <cmath>
  4. #include <fstream>
  5. using namespace std;
  6. main ()
  7. {
  8. double xa,ya,xb,yb,xc,yc,xd,yd,xe,ye,xf,yf,ab,ba,bc,cb,ac,ca,fe,ef,ed,de,fd,df,k,PLOTASABC,PLOTASDEF,PERABC,PERDEF;
  9. ifstream f1("duoms3.txt");
  10. ofstream f2("rezs3.txt");
  11. f1>>xa>>ya>>xb>>yb>>xc>>yc>>xd>>yd>>xe>>ye>>xf>>yf;
  12. ab=pow(((xa-xb)*(xa-xb)+(ya-yb)*(ya-yb)),0.5);
  13. bc=sqrtl(pow((xb-xc),2)+pow((yb-yc),2));
  14. ac=sqrtl(pow((xa-xc),2)+pow((ya-yc),2));
  15. fe=sqrtl(pow((xf-xe),2)+pow((yf-ye),2));
  16. ed=sqrtl(pow((xe-xd),2)+pow((ye-yd),2));
  17. fd=sqrtl(pow((xd-xf),2)+pow((yd-yf),2));
  18. ab=ba; bc=cb; ac=ca; fe=ef; ed=de; fd=df;
  19. if ((((xa==xb)and(xa==xc))or((ya==yb)and(ya==yc)))and(((xd==xe)and(xd==xf))or((yd==ye)and(yd==yf))))
  20. {
  21. f2<<"Trikampiai ABC ir FED neegzituoja.";
  22. cout<<"Trikampiai ABC ir FED neegzituoja.";
  23. }
  24. else if (((xa==xb)and(xa==xc))or((ya==yb)and(ya==yc)))
  25. {
  26. f2<<"Trikampis ABC neegzistuoja.";
  27. cout<<"Trikampis ABC neegzistuoja.";
  28. }
  29. else if (((xd==xe)and(xd==xf))or((yd==ye)and(yd==yf)))
  30. {
  31. f2<<"Trikampis FED neegzituoja.";
  32. cout<<"Trikampis FED neegzituoja.";
  33. }
  34. else
  35. {
  36. if (((ab/de)==(bc/ef))and((ab/de)==(ac/df)))
  37. {
  38. k=ab/de;
  39. f2<<"Trikampis ABC panašus trikampiui DEF ir jų panašumo koeficientas k yra: "<<k<<endl;
  40. cout<<"Trikampis ABC panašus trikampiui DEF ir jų panašumo koeficientas k yra: "<<k<<endl;
  41. }
  42. else if (((ab/ef)==(bc/df))and((ab/ef)==(ac/de)))
  43. {
  44. k=ab/ef;
  45. f2<<"Trikampis ABC panašus trikampiui EFD ir jų panašumo koeficientas k yra: "<<k<<endl;
  46. cout<<"Trikampis ABC panašus trikampiui EFD ir jų panašumo koeficientas k yra: "<<k<<endl;
  47. }
  48. else if (((ab/df)==(bc/de))and((ab/df)==(ac/ef)))
  49. {
  50. k=ab/df;
  51. f2<<"Trikampis ABC panašus trikampiui FDE ir jų panašumo koeficientas k yra: "<<k<<endl;
  52. cout<<"Trikampis ABC panašus trikampiui FDE ir jų panašumo koeficientas k yra: "<<k<<endl;
  53. }
  54. PLOTASABC=sqrt(((ab+bc+ca)/2)*(((ab+bc+ca)/2)-ab)*(((ab+bc+ca)/2)-bc)*(((ab+bc+ca)/2)-ca));
  55. PLOTASDEF=sqrt(((de+ef+df)/2)*(((de+ef+df)/2)-de)*(((de+ef+df)/2)-ef)*(((de+ef+df)/2)-df));
  56. PERABC=ab+bc+ca;
  57. PERDEF=de+ef+df;
  58. if (PLOTASABC>PLOTASDEF)
  59. {
  60. f2<<"Trikampio ABC plotas yra: "<<PLOTASABC<<endl<<"Trikampio ABC perimetras yra "<<PERABC<<endl;
  61. cout<<"Trikampio ABC plotas yra: "<<PLOTASABC<<endl<<"Trikampio ABC perimetras yra "<<PERABC<<endl;
  62. }
  63. else if (PLOTASDEF>PLOTASABC)
  64. {
  65. f2<<"Trikampio DEF plotas yra: "<<PLOTASDEF<<endl<<"Trikampio DEF perimetras yra "<<PERDEF<<endl;
  66. cout<<"Trikampio DEF plotas yra: "<<PLOTASDEF<<endl<<"Trikampio DEF perimetras yra "<<PERDEF<<endl;
  67. }
  68. else
  69. {
  70. f2<<"Trikampio DEF ir ABC plotas yra: "<<PLOTASDEF<<endl<<"Trikampio DEF ir ABC perimetras yra "<<PERDEF<<endl;
  71. cout<<"Trikampio DEF ir ABC plotas yra: "<<PLOTASDEF<<endl<<"Trikampio DEF ir ABC perimetras yra "<<PERDEF<<endl;
  72. }
  73. cout<<"ab="<<ab<<endl<<"bc="<<bc<<endl<<"ac="<<ac<<endl<<"de="<<de<<endl<<"ef="<<ef<<endl<<"fd="<<fd<<endl<<"k="<<k<<endl<<"PLOTASABC="<<PLOTASABC<<endl<<"PLOTASDEF="<<PLOTASDEF<<endl<<"PERABC="<<PERABC<<endl<<"PERDEF="<<PERDEF<<endl;
  74. }
  75. f1.close();
  76. f2.close();
  77. return 0;
  78. }
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement