Ecuatia de gradul II
Probabil multi adolescenti ce nu se pricep la matematica navigheaza pe diferite site-uri incercand sa gaseasca "programe de rezolvat probleme de matematica" ei... eu n-am gasit u asemenea program dar astazi o sa va arat cum sa va faceti propriul vostru program de rezolvare a ecuatiilor de gradul 2.
Ceva de genu: ax2+bx+c =0
Bun... pentru inceput va trebuie Visual Basic 6 Portable, il puteti lua de aici: http://www.mediafire.com/?wxx8wiuoxfi4d4m


- Acum ca aveti VB6 downloadat , intrati in el
- Dati click pe "Reg Key(allows exe.creation)"
- Apoi pe "Run Visual Basic 6"
- Alegeti Standar EXE
- Creati LABEL-uri(x6) , Texte(x6) si Butoane(x2)
- Puteti schimba numele aplicatiei executand click stanga pe bara albastra unde scrie "Form1" si in dreapta va aparea niste propietati , gasiti sectiunea NAME si o sa vedeti in dreapta "Form1"(numele aplicatiei voastre) , puteti sa puneti orice nume doriti.
- Dupa ce ati inserat label-uri, texte si butoane , le ve-ti aranja astfel./Pentru a le redenumi dati click pe label/text/buton si veti vedea in dreapta Caption , acolo veti scrie...
- Atentie pentru a functiona aplicatia label-urile ,textele si butoanele trebuiesc aranjate LA FEL ca in imagine
- Dupa ce le-ati denumit ca in poza alaturata dati dublu-click pe un buton,nu conteaza si....
- Stergeti tot ce va v-a aparea in fereasta folosind Ctrl+A si apoi BackSpace sau Delete
- Bun... acum dupa ce ati sters totul v-a trebui sa introduceti acest cod(Atentie!!! Codul v-a functiona DOAR daca ati aranjat Label-urile,Textele ,si Butoanele ca in imaginea de mai sus.)
- Codul :
Private Sub Command1_Click()
Text4.Text = (Val(Text2.Text) ^ 2) - 4 * (Val(Text1.Text) * Val(Text3.Text))
End Sub
Private Sub Command2_Click()
Text5.Text = (-Val(Text2.Text) + Val(Text4.Text) ^ 1 / 2) / 2 * Val(Text1.Text)
Text6.Text = (-Val(Text2.Text) - Val(Text4.Text) ^ 1 / 2) / 2 * Val(Text1.Text)
End Sub
- Dupa ce ati introdus codul iesiti din fereasta in care ati introdus codul
- Mergeti la FILE->MAKE PROJECT 1.EXE
- Alegeti locul unde sa salvati aplicatia si dati SAVE
Si gata asta a fost!!!!
Olá! Se você ainda não assinou, assine nosso RSS feed e receba nossas atualizações por email, ou siga nos no Twitter.
Popular posts
-
In prima mea spatamana la liceu un coleg mi-a aratat aceasta problema de logica...Problema e ca nu stiu cum sa o rezolv...am consumat o jum...
-
Informatii Soseaua Transalpina : harta Transalpina, imagini live Transalpina, cat e Transalpina de asfaltata, vremea Transalpina, poze Tra...
-
Mrwu from Togzhou, China , father of two, look like a farmer . He appears to be quite poor and perhaps wouldn`t be regarded by many people a...
-
Astazi va avea loc lansarea noul smartphone al companiei Apple. Odata cu lansarea iPhone 5 ar putea creste si economia Statelor Unite. Ana...
-
Se pare ca in urma spuselor oamenilor de stinta acestia au gasit 2 planete de tip Super-Pamant care sunt favorite pentru colonizare. Aproxim...
-
M`am gandit sa pun un joc ca sa ne mai treaca plictiseala, acest joc consta in: o persoana va spune ceva ce nu a facut niciodata iar urmator...
-
Ten sheep masacreed for a unedentified creature. Is what terrified farmers and Russian.
-
Transfăgărăşanul (trans + făgăraş) sau DN7C este unul din cele mai spectaculoase drumuri din România. Drumul leagă regiunea istoric...
-
RO:Bun de dimineata m-am dus la forja mea... si am vazut bucata de otel zic eu decalita.... si era decalita...asa ca m-am pus cu bomfaieru ...
-
EN: Protective ozone layer in the upper atmosphere above a Arctic Cicle present, for fisrt time since it is monitored, a similar hole that...