不好意思請能者幫忙解我這個問題，另外也很抱歉再次發一次問題，因為第一次用該論壇發文系統。


題目主旨：

程式中有三項物品，品名及單價分別為可樂20元、果汁25元、礦泉水10元，當輸入數量及單價後，可計算出總金額。當輸入付現金額1000元，可計算找零金額並找出最少個數。最後將購買數量加以分類。



以下是題目要求：

1.三項物品利用RadioButton物件以單選方式點選

2.單價、數量與付現金額使用InputBox函式輸入

3.計算總金額&找零金額

4.找出最少個數，零錢分別為100、50、10、5四種

5.數量若超過100為大量、21-99為中量、小於20為小量


void __fastcall TForm1::RadioButton1Click(TObject *Sender)
{
if(RadioButton1->Checked==true)

Edit1->Text=20;
Edit2->Text=IntToStr(StrToInt(Edit2->Text));
Edit13->Text=IntToStr(StrToInt(Edit1->Text)*StrToInt(Edit2->Text));

if(RadioButton2->Checked==true)
Edit3->Text=25;
Edit4->Text=IntToStr(StrToInt(Edit4->Text));
Edit14->Text=IntToStr(StrToInt(Edit3->Text)*StrToInt(Edit4->Text));

if(RadioButton3->Checked==true)
Edit5->Text=20;
Edit6->Text=IntToStr(StrToInt(Edit6->Text));
Edit15->Text=IntToStr(StrToInt(Edit5->Text)*StrToInt(Edit6->Text));


Edit7->Text=1000;
Edit8->Text=IntToStr(StrToInt(Edit7->Text)-(StrToInt(Edit13->Text) StrToInt(Edit14->Text) StrToInt(Edit15->Text)));

int i,j,k,l;
if(i==IntToStr(StrToInt(Edit8->Text)0)==0 )
if(i==IntToStr(StrToInt(Edit8->Text)0)==true)return;
Edit9->Text=IntToStr(StrToInt(Edit8->Text)/100);
i==IntToStr(StrToInt(Edit8->Text)0);

if(j==IntToStr(iP)==0)
if(j==IntToStr(iP)==true)return;
Edit10->Text=IntToStr(i/50);
j==IntToStr(iP);

if(k==IntToStr(j)==0)
if(k==IntToStr(j)==true)return;
Edit11->Text=IntToStr(j/10);
k==IntToStr(j);

if(l==IntToStr(k%5)==true)
Edit12->Text=IntToStr(k/5);
l==IntToStr(k%5);
}

編輯記錄

首先我想說你的if忘記括號了

ex:
if(RadioButton1->Checked==true)
{
Edit1->Text=20;
Edit2->Text=IntToStr(StrToInt(Edit2->Text));
Edit13->Text=IntToStr(StrToInt(Edit1->Text)*StrToInt(Edit2->Text));
}

 H檔