Предмет: Информатика,
автор: Vikaa2811
помогите пожалуйста, выдаёт ошибку 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:
выдаёт ошибки потом следующие. в нижних строках
Edit2.text:=Edit1.text + Edit1.text;
Edit3.text:= Utf8copy(Edit1.text,1,1);
s1:= Edit3.text;
s1:=k+s1;
Похожие вопросы
Предмет: Русский язык,
автор: прокуда
Предмет: Русский язык,
автор: ifaina515333z
Предмет: Русский язык,
автор: 123654ф
Предмет: Русский язык,
автор: эмиль140
Предмет: Химия,
автор: Zzzzzzzzzzws1