Qarshilik
Qarshilik dasturi, uning formasi 1.4-rasmda keltirilgan, ketma-ket yoki parallel ulanishi mumkin bo’lgan, ikkita rezistordan tashkil topgan, elektr zangiri qarshiligini hisoblaydi. RadioButton komponentasidan foydalanishni namoyish etadi.
Label4
Edit2
Edit1
RadioButton1
RadioButton2
1.4-rasm. Qarshilik dastur formasi
//hisoblash tugmasini bosish
void __fastcall TForm1::Button1Click(TObject *Sender) {
double r1,r2; //Qarshiliklar kattaligi
double r; //Zanjir qarshiligi
//boshlang'ich ma'lumotlarni olish
r1=StrToFloat(Edit1->Text);
r2=StrToFloat(Edit2->Text);
if(r1==0 && r2==0){
ShowMessage("Kamida bitta qarshilikni ko'rsatish
kerak");
Do'stlaringiz bilan baham: |