Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Câu 1:
ho_ten = input("Nhập họ tên: ")
tach_ho_ten = ho_ten.split()
if len(tach_ho_ten) > 1:
ten = tach_ho_ten[-1]
print("Tên của bạn là:", ten)
else:
print("Nhập sai định dạng họ tên")
Câu 2:
s = input("Nhập xâu: ")
hoa = s.upper()
print(hoa)
program ct;
uses crt;
var
s1,s2:string;
begin
clrscr;
write('nhap ho dem: ');
readln(s1);
write('nhap ten: ');
readln(s2);
writeln('ten day du la: ',s1,' ',s2);
readln;
end.
uses crt;
var st1,st2:string;
begin
clrscr;
readln(st1,st2);
if st1>st2 then writeln('Xau st1 lon hon')
else if st2>st1 then writeln('Xau st2 lon hon')
else writeln('Hai xau bang nhau');
readln;
end.
uses crt;
var st:string;
d,i,dem:integer;
begin
clrscr;
write('Nhap xau:'); readln(st);
d:=length(st);
while st[1]=#32 do
begin
delete(st,1,1);
d:=length(st);
end;
while st[d]=#32 do
begin
delete(st,d,1);
d:=length(st);
end;
for i:=1 to d do
begin
while (st[i]=#32) and (st[i+1]=#32) do
begin
delete(st,i,1);
d:=length(st);
end;
end;
st[1]:=upcase(st[1]);
for i:=1 to d do
if st[i]=#32 then st[i+1]:=upcase(st[i+1]);
writeln('Ten cua ban sau khi viet dung la: ',st);
dem:=1;
for i:=1 to d do
if st[i]=#32 then inc(dem);
writeln('So tu cua xau la: ',dem);
readln;
end.
uses crt;
var st:string;
i,d,dem:integer;
begin
clrscr;
readln(st);
d:=length(st);
while st[1]=' ' do
begin
delete(st,1,1);
d:=length(st);
end;
while st[d]=' ' do
begin
delete(st,d,1);
d:=length(st);
for i:=1 to d do
if (st[i]=' ' and st[i+1]=' ') then delete(st,i,1);
dem:=0;
for i:=1 to d do
if st[i]=' ' then dem:=dem+1;
writeln(dem+1);
readln;
end.