uo ;;
RadioButton1.Caption:= 3000 raquo ;;. Caption:= 1000 raquo ;;. Caption:= +7000 raquo ;;. Caption:= +4800 raquo ;;. Caption:= 2 100 raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption:=IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button19Click (Sender: TObject); RadioButton1.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Довжина сірники ... см raquo ;;
RadioButton1.Caption:= 4 raquo ;;. Caption:= 3 raquo ;;. Caption:= 2.5 raquo ;;. Caption:= 6 raquo ;;. Caption:= 5 raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption :=IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button20Click (Sender: TObject); RadioButton2.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= вузький raquo ;;. Caption:= незграбний raquo ;;. Caption:= короткий raquo ;;. Caption:= високий raquo ;;. Caption:= laquo ; широкий raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption: =IntToStr (ball);
Label5.Caption:= Стомлений матеріал. Розділ 2. Завдання 21-40. Питання номер: + IntToStr (num);
end; TForm2.Button21Click (Sender: TObject); RadioButton1.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= велосипед raquo ;;. Caption:= мотоцикл raquo ;;. Caption:= поїзд raquo ;;. Caption:= трамвай raquo ;;. Caption:= laquo ; автобус raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption: =IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button22Click (Sender: TObject); RadioButton4.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= захід raquo ;;. Caption:= курс raquo ;;. Caption:= напрямок raquo ;;. Caption:= подорож raquo ;;. Caption:= laquo ; північ raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption: =IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button23Click (Sender: TObject); RadioButton2.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= бачити raquo ;;. Caption:= говорити raquo ;;. Caption:= відчувати raquo ;;. Caption:= нюхати raquo ;;. Caption:= laquo ; чути raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption: =IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button24Click (Sender: TObject); RadioButton4.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= прилягти raquo ;;. Caption:= підвестися raquo ;;. Caption:= присісти raquo ;;. Caption:= притулитися raquo ;;. Caption:= laquo ; підвестися raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption: =IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button25Click (Sender: TObject); RadioButton3.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= коло raquo ;;. Caption:= еліпс raquo ;;. Caption:= стріла raquo ;;. Caption:= дуга raquo ;;. Caption:= laquo ; крива raquo ;;. Visible:=false; .Top:=Button1.Top; .Left:=Button1.Left; .Visible:=true;:=num + 1; .Caption:=IntToStr (num) ;. Caption: =IntToStr (ball) ;. Caption:= Питання номер: + IntToStr (num) ;; TForm2.Button26Click (Sender: TObject); RadioButton4.Checked=true then:=ball + 1:=ball;
Label1.Caption:= Знайдіть зайве слово, що не підходящого змісту до чотирьох інших з п'яти названих: raquo ;;
RadioButton1.Caption:= добрий raquo ;;. Caption:= вірний raquo ;;. Caption:= чуйний raquo ;;. Caption:= боягузливий raquo ;;. Caption:= laquo ; чес...