Бағдарламаның нәтижесі қандай? procedure TForml.ButtonlClick(Sender: TObject); var a, b,c : integer; begin a:=StrToInt(Editl.Text); b:=StrToInt(Edit2.Text); с:=StrToInt(Edit3. Text); a:=a+b; c:= a-b; Label 1. Caption :='a= "+IntToStr(a)+ "b= "+IntToStr(b)+ "c= "+IntToStr(c); Егер енгізу үшін мына сандар берілсе: 12; 13; 14
а=25 b=13 с=12
Бағдарламаның нәтижесі қандай? procedure TForml.ButtonlClick(Sender: TObject); var a, b,c : integer; begin a:=StrToInt(Editl .Text); b:=StrToInt(Edit2.Text); с:=StrToInt(Edit3. Text); Label 1. Caption:=' a= "+IntToStr(a+b)+ "b= "+IntToStr(b div 2)+ "c= "-rlntToStr(c-lO); Егер енгізу үшін мына сандар берілсе: 5; 15; -2
a=20 b=7 с=-12
Бағдарламаның нәтижесі қандай? procedure TForml.ButtonlClick(Sender: TObject); var a, b,c : integer; begin b:=a-5; c:=b-a; Labell.Caption:='a= "+IntToStr((a+b) div 4)4- "b= "+IntToStr(b)+ "c= "+IntToStr(c); Егер енгізу үшін мына сандар берілсе: -10; 4; 6
