Input "What is the percent of the first item?",item1
Input "What is the percent of the first item?",item2
Input "What is the weight?",weight
Input "What is the main percent?",percent
If item1<percent:Then
percent[neg]item1->item1
Else
item1[neg]percent->item1
End
If item2<percent:Then
percent[neg]item2->item2
Else
item2[neg]percent->item2
End
item1+item2->total
item1/total->item1percent
item2/total->item2percent
item1percent*100->item1percentdisplay
item1percent*100->item2percentdisplay
Disp "The percent of item1 of the total is"+ item1percentdisplay
Disp "The perceny of item2 of the total is"+ item2percentdisplay
weight*item1percent->item1weight
weight*item2percent->item2weight
Disp "The weight of item1 is"+ item1weight
Disp "The weight of item2 is"+ item2weight
weight[neg]item1weight[neg]item2weight->crudeweight
Disp "The crude weight is"+ crudeweight
Disp "----------------------------"
Disp "Program made by Trig!"