um + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button44Click (Sender: TObject); RadioButton3.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Дія - успіх; обробка -? raquo ;;. Caption:= товар raquo ;;. Caption:= праця raquo ;;. Caption:= обробка raquo ;;. Caption:= досягнення raquo ;;. Caption:= ціна raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button45Click (Sender: TObject); RadioButton4.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Тварина - коза; їжа -? raquo ;;. Caption:= продукт raquo ;;. Caption:= їжа raquo ;;. Caption:= обід raquo ;;. Caption:= хліб raquo ;;. Caption:= кухня raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button46Click (Sender: TObject); RadioButton2.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Голод - худоба; праця -? raquo ;;. Caption:= зусилля raquo ;;. Caption:= втома raquo ;;. Caption:= ентузіазм raquo ;;. Caption:= плата raquo ;;. Caption:= відпочинок raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button47Click (Sender: TObject); RadioButton3.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Місяць - Земля; Земля -? raquo ;;. Caption:= Марс raquo ;;. Caption:= зірка raquo ;;. Caption:= Сонце raquo ;;. Caption:= планета raquo ;;. Caption:= повітря raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button48Click (Sender: TObject); RadioButton2.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Ножиці - різати; орнамент -? raquo ;;. Caption:= вишивати raquo ;;. Caption:= прикрашати raquo ;;. Caption:= створювати raquo ;;. Caption:= малювати raquo ;;. Caption:= випилювати raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button49Click (Sender: TObject); RadioButton4.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Автомобіль - мотор; яхта -? raquo ;;. Caption:= борт raquo ;;. Caption:= кіль raquo ;;. Caption:= корми raquo ;;. Caption:= вітрило raquo ;;. Caption:= щогла raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button50Click (Sender: TObject); RadioButton4.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Роман - пролог; опера -?. raquo ;;. Caption:= афіша raquo ;;. Caption:= програма raquo ;;. Caption:= лібрето raquo ;;. Caption:= увертюра raquo ;;. Caption:= арія raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button51Click (Sender: TObject); RadioButton2.Checked=true then:=ball + 1:=ball; .Caption:= Ялина - дуб; стіл -? raquo ;;. Caption:= меблі raquo ;;. Caption:= шафа raquo ;;. Caption:= скатертину ??raquo ;;. Caption:= гардероб raquo ;;. Caption:= гарнітур raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button52Click (Sender: TObject); RadioButton2.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Мова - гіркий; очей -? raquo ;;. Caption:= зір raquo ;;. Caption:= червоний raquo ;;. Caption:= окуляри raquo ;;. Caption:= світло raquo ;;. Caption:= зірке raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button53Click (Sender: TObject); RadioButton3.Checked=true then:=ball + 1:=ball; .Caption:= Їжа - сіль; лекція -? raquo ;;. Caption:= нудьга raquo ;;. Caption:= конспект raquo ;;. Caption:= гумор raquo ;;. Caption:= бесіда raquo ;;. Caption:= мова raquo ;;. Visible :=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball);.Caption:= Питання номер: + IntToStr (num) ;; TFo...
