ответь на вопросы 1. Что такое КЕГЕЛЬРИНГ?
2.Какие предметы можно использовать в качестве кеглей?
3. Куда помещается робот в ринге?​

Как задать значение переменной которое введено в Edit?

вообщем чтобы из Edit значение поподало в переменную

к примеру:

...

var

kurs: real;

Edit1.Text:='КАКОЕТО_ЧИСЛО'

...

kurs:='РАВЕН_ЭТОМУ_КАКОМУТО_ЧИСЛУ'

Объяснение:

DelphiВыделить код

1

2

3

4

5

6

procedure TForm1.Edit1Change(Sender: TObject);

var

  Kurs:real;

begin

  Kurs:=StrToFloat(Edit1.Text);

end;

Добавлено через 24 минуты 0 секунд

или так,

DelphiВыделить код

1

2

3

4

5

6

7

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

var

  Kurs:real;

begin

  if not (Key in ['0'..'9','-','+','.',',',#8,#13]) then Key:=#0;

  Kurs:=StrToFloat(Edit1.Text);

end;

Этой программе все равно, сколько слов во фразе и какой они длины. А заодно, ей все равно, сколько между словами пробелов...

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
procedure Times(a:array of string; pic:string; var n:integer);
begin
  n:=a.Where(s->s=pic).Count
end;

begin
  var s:=ReadlnString('>').ToWords;
  var k:integer;
  var w:='ЗНАЧИТ'; Times(s,w,k); Println(k,'-',w);
  w:='ВОТ'; Times(s,w,k); Println(k,'-',w);
  w:='АВТОМОБИЛЬ'; Times(s,w,k); Println(k,'-',w);
end.

Тестовое решение
> ВОТ ЗНАЧИТ КАКОЕ ДЕЛО БЫЛО ЕХАЛ ПО ДОРОГЕ АВТОМОБИЛЬ И ВОТ СТОИТ ЧЕЛОВЕК И ДУМАЕТ А ЧТО ЗНАЧИТ СЛОВО АВТОМОБИЛЬ А СЛОВО АВТОМОБИЛЬ ЭТО ОТ ГРЕЧЕСКОГО АУТОС (САМ) И ЛАТИНСКОГО МОБИЛИС (ПОДВИЖНЫЙ) ВОТ ТАКОЕ ЭТО СЛОВО
2 - ЗНАЧИТ
3 - ВОТ
3 - АВТОМОБИЛЬ