câu 1 : viết chương trình tính độ dài của xâu s . in kết quả ra màn hình câu 2 : viết chương trình cộng vào 2 xâu s1 và s2 , kết quả cộng đc lưu vào xâu s . in kết quả ra màn hình =))) giúp mình vs ạ
2 câu trả lời
Câu 1:
Program NN;
Uses crt;
Var St: String;
Begin
Clrscr;
Write('Nhap St: '); Readln(St);
Write(length(St));
Readln
End.
Câu 2:
Program NN;
Uses crt;
Var S1,s2,s: String;
Begin
Clrscr;
Write('Nhap S1: '); Readln(S1);
Write('Nhap S2: '); Readln(S2);
s:=S1+S2;
Write(S);
Readln
End.
Câu 1
Var s: string ;
begin
read(s);
write(length(s));
readln
end.
Câu 2
Var s1,s2,s: string;
begin
readln(s1); readln(s2);
s:=s1+s2;
write(s);
readln
end.
