Lập trình đơn giản

NA

Cho trước xâu S chứa các kí tự in hoa, chữ số và kí hiệu. Hãy mã hóa xâu S theo kĩ thuật dịch chuyển mô tả:

A thế thành Z, B thế thành Y, C thay thế bẳng X, và tương tự như thế,... Còn các con số và kí hiêu thì không đổi.

VD: TIN HOC TRE HUYEN CHAU THANH 2018!

=> GRM SLX GIV SFBVM XSZF GSZMS 2018!

ML
8 tháng 5 2019 lúc 20:17

var S:ansistring;
i:longint;
begin
read(S);
for i:=1 to length(S) do
if (ord(S[i])>=65) and (ord(S[i])<=90) then
S[i]:=chr(90-(ord(S[i])-65));
writeln(S);
end.

Bình luận (0)

Các câu hỏi tương tự
PF
Xem chi tiết
PF
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
H24
Xem chi tiết
PF
Xem chi tiết
H24
Xem chi tiết