Lập chương trình nhập vào một xâu. Đưa ra màn hình 3 kí tự cuối cùng của xâu đó Bày nhanh hộ mình với ạ

0 bình luận về “Lập chương trình nhập vào một xâu. Đưa ra màn hình 3 kí tự cuối cùng của xâu đó Bày nhanh hộ mình với ạ”

1. uses crt;
   var s:string;
       d,i:integer;
   begin
      clrscr;
      writeln(‘Nhap xau s: ‘); readln(s);
      d:=length(s);
      for i:=d-2 to d do write(s[i]);
   end.

   Bình luận