помогите пожалуйста, выдаёт ошибку fatal:syntax error, ":" expected but ";" found
implementation
{$R *.lfm}
{ TForm1 }
procedure TForm1.Button1Click(Sender: TObject);
var k; integer; (здесь выдаёт ошибку )
s1, s2: string;
begin
k:=Utf8lengths( Edit1.text);
Edit2.text:=Edit1.text + Edit1.text;
Edit3.text:= Utf8copy(Edit1.text,1,1);
s1:= Edit3.text;
s1:=k+s1;
end;
end.
Ответы
Ответ дал:
0
Ответ:
не знаю какой клас информатика
Ответ дал:
1
Ответ:
var k; integer; замени на var k: integer;
Vikaa2811:
выдаёт ошибки потом следующие. в нижних строках
k:=Utf8lengths( Edit1.text);
Edit2.text:=Edit1.text + Edit1.text;
Edit3.text:= Utf8copy(Edit1.text,1,1);
s1:= Edit3.text;
s1:=k+s1;
Edit2.text:=Edit1.text + Edit1.text;
Edit3.text:= Utf8copy(Edit1.text,1,1);
s1:= Edit3.text;
s1:=k+s1;
я с этим языком не знаком, саму ошибку покажи
Вас заинтересует
2 года назад
2 года назад
2 года назад
8 лет назад
9 лет назад