Tin học Bài tập chuỗi ký tự

[học mãi.vn.com]

[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

viết ct nhập vào xâu s bất kì có cả kí tự và kí tự số. Hãy lập trình đưa các kí tự số thành chữ in hoa
1=S,2=X,3=Y,4=Z,5=T rồi tb kết quả ra màn hình
sử dụng câu lệnh if, for...to

 

[Tạ Đặng Vĩnh Phúc]

for i := 1 to length(s)
case s of
'1': s = 'S';
'2': s = 'X';
'3': s = 'Y';
'4': s = 'Z';
'5': s = 'T';
end;

write (s);

 

[ka1412]

for i := 1 to length(s)
case s of
'1': s = 'S';
'2': s = 'X';
'3': s = 'Y';
'4': s = 'Z';
'5': s = 'T';
end;
write (s);

s phải thay thành s bạn ơi

case s[i] of
  '1': s[i] = 'S';
  '2': s[i] = 'X';
  '3': s[i] = 'Y';
  '4': s[i] = 'Z';
  '5': s[i] = 'T';
end;