даю 50 балов!!!
создайте процедуру обработки события OnClick для кнопки "Перевести на русский"
Lazarus
( пример)
​

Ответ:

Это моё дз было. Ток сделал. Пиши так

procedure TForm1.Button3Click(Sender: TObject);

var x:integer; Y:String;

begin

Y:=Edit3.Text;

x:=-1;

Repeat x:=x+1;

 Until Eng_words[x]=Y;

 Edit4.Text:=Rus_words[x];

end;

eng.

Если, что это для 3 кнопки

Объяснение: