Tin học nhập vào 2 xâu nếu độ dài xâu 1 lớn hơn xâu 2 thì in hoa kí tự đầu tiên của xâu 1 , ngược lại in hoa kí tự cuối cùng của xâu 2 16/07/2021 By Charlie nhập vào 2 xâu nếu độ dài xâu 1 lớn hơn xâu 2 thì in hoa kí tự đầu tiên của xâu 1 , ngược lại in hoa kí tự cuối cùng của xâu 2
program phuongt;uses crt var s, a: string;begin write(‘Nhap xau 1: ‘); readln(s); write(‘Nhap xau 2: ‘); readln(a); if length(s)>length(a) then begin s[1]:=upcase(s[1]); write(s); end else begin a[length(a)]:=upcase(a[length(a)]); write(a); end; readlnend. Trả lời
var s1, s2: string; Begin Write(‘nhap xau s1: ‘); readln(s1); Write(‘nhap xau s2: ‘); readln(s2); If length(s1) > length(s2) s1[1]:=upcase(s1[1]) Else s2[length(s2)]:=upcase(s2[length(s2)]); End. Trả lời