K
Khách

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.

uses crt;

var s1,s2:string;

begin

clrscr;

readln(s1,s2);

writeln(s1+s2);

readln;

end.

8 tháng 1 2023

#include <bits/stdc++.h>
using namespace std;
int main() {
string s1, s2, s;
getline(cin,s1);
getline(cin,s2);
s=s1+s2;
cout << s;
}

Chúc bạn học tốt!

uses crt;

var s1,s2:string;

begin

clrscr;

readln(s1,s2);

insert(s1,s2,5);

writeln(s2);

readln;

end.

uses crt;

var s1,s2:string;

i,j,d1,d2:integer;

begin

clrscr;

readln(s1,s2);

d1:=length(s1);

d2:=length(s2);

for i:=1 to d1 do 

  if not(s1[i] in ['0'..'9']) then delete(s1,i,1);

for i:=1 to d2 do 

  if not(s2[i] in ['0'..'9']) then delete(s2,i,1);

writeln(s1);

writeln(s2);

writeln(s1+s2);

readln;

end.

16 tháng 3 2023

Program HOC24;

var s1,s2: string;

i: byte;

begin

write('Nhap xau S: '); readln(s);

s1:='';

for i:= length(s) downto 1 do

if s[i] in ['A'..'Z'] then s1:=s1+s[i];

write('Xau S1 : ',s1);

readln

end.