Введённую с клавиатуры строку А записать в обратном порядке в строку В

@AkekseyAA · Регистрация: 30.05.2018

Введённую с клавиатуры строку А, записать в обратном порядке в строку В. Строку В вывести на экран.
Помогите написать для этого код

@ZfoxAK · 06.06.2018, 06:49

Delphi

procedure TForm1.Button1Click(Sender: TObject);
var a, b: string; i: Integer;
begin
 a:=Edit1.Text;
 b:='';
 for I := 1 to Length(a) do
   b:=a[i]+b;
   label1.Caption:=b;
end;

@D1973 · 06.06.2018, 07:04

Delphi

uses ..., StrUtils;
...
var a, b: String;
...
 a := Edit1.Text;
 b := ReverseString(a);
 ShowMessage(b);

@AkekseyAA 0 / 0 / 0 Регистрация: 30.05.2018 Сообщений: 10
		1
	Введённую с клавиатуры строку А записать в обратном порядке в строку В 06.06.2018, 06:15. Показов 1141. Ответов 2 Метки нет (Все метки) Введённую с клавиатуры строку А, записать в обратном порядке в строку В. Строку В вывести на экран. Помогите написать для этого код __________________ Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь 0

Опции темы

Введённую с клавиатуры строку А записать в обратном порядке в строку В

Решение