, выдаёт ошибку 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.
не знаю какой клас информатика
var k; integer; замени на var k: integer;