Бодлого № 1

 

1. Form -ийг дээрх байдлаар байрлуулна.

2. Нэмэх гэсэн товчин дээр 2 дарж дараах код бичнэ.

    label1.Caption:=IntToStr(StrToInt(Edit1.Text) + StrToInt(Edit2.Text)+StrToInt(Edit3.Text));
3. Хасах гэсэн товчин дээр 2 дарж дараах код бичнэ.

    label6.Caption:=IntToStr(StrToInt(Edit1.Text) - StrToInt(Edit2.Text)-StrToInt(Edit3.Text));

4. Ажиллуулна.