예) 123을 입력하면
뒤서부터 321이 출력되게 !
난 파스칼(델파이)로 했다
procedure TForm1.Button1Click(Sender: TObject);
var
i,r,u : integer;
p : string;
begin
i := length(edit1.Text);
u := i;
for r:=1 to i do
begin
p := p + copy(edit1.Text,u,1);
u := u - 1;
end;
edit2.Text := p;
end;
버튼1을 누르면 에딧1에 입력한것이 에딧2로 꺼꿀로 출력 되는것이쥥
자 시쟉!
뒤서부터 321이 출력되게 !
난 파스칼(델파이)로 했다
procedure TForm1.Button1Click(Sender: TObject);
var
i,r,u : integer;
p : string;
begin
i := length(edit1.Text);
u := i;
for r:=1 to i do
begin
p := p + copy(edit1.Text,u,1);
u := u - 1;
end;
edit2.Text := p;
end;
버튼1을 누르면 에딧1에 입력한것이 에딧2로 꺼꿀로 출력 되는것이쥥
자 시쟉!
strrev
char s[99];main(c){scanf(\"%s\",s);puts(s);c=strlen(s);while(c--)printf(\"%c\",s[c]);}
http://ideone.com/PAtojk