Cho hai mảng số nguyên dương A và B lần lượt có N và M số. Các phần tử trong cả hai mảng A và B đều được sắp theo thứ tự tăng dần.
Yêu cầu: hãy tạo mảng C gồm N+M phần tử từ tất cả các phần tử của A và B sao cho các phần tử của C cũng có thứ tự tăng dần.
Input
· Dòng đầu chứa 2 số N, M (0 < N, M <50 000)
· N dòng sau, mỗi dòng chứa một số nguyên của mảng A.
· M dòng tiếp theo chứa 1 số nguyên dương ứng với các phần tử của mảng B.
Kết quả gồm N+M dòng, lần lượt chứa các phần tử của mảng C.
Input
3 2
1
2
5
2
4
Output
1
2
2
4
5
Đăng ký:
Đăng Nhận xét (Atom)
Bài được xem nhiều nhất
-
Cho dãy n số nguyên dương a1, a2, …, an và số nguyên dương S. Hãy đếm xem có bao nhiêu cặp phần tử (ai, aj) (i <> j) thỏa mãn ai + aj ...
-
Tìm X biết: 10 + 11 + 12 + 13 + ... + X = 5106 ------ Hướng dẫn giải: Hãy cố gắng nhớ lại công thức tính tổng dãy tăng có quy luật (số đ...
-
Xét xâu S chỉ bao gồm các kí tự ngoặc mở ‘(‘ và ngoặc đóng ‘)’. Xâu S xác định một cách đặt ngoặc đúng, nếu thỏa mãn các điều kiện: · Tổng ...
-
Cho trước số nguyên dương n. Viết chương trình kiểm tra xem có bao nhiêu số nguyên dương nhỏ hơn hoặc bằng n nguyên tố cùng nhau với n (nghĩ...
-
Một chuỗi được gọi là có dạng phân số nếu nó có dạng như sau: Tử_số/Mẫu_số. Ví dụ: chuỗi ‘123/456’ biểu diễn cho phân số chuỗi ‘1/12’ biể...
-
Nhập xâu s chỉ chứa các chữ cái viết hoa. Đếm xem s có bao nhiêu kí tự khác nhau. Input · Dòng 1: số test t · t dòng sau: mỗi dòng 1 xâu ...
-
Đề thi tin học trẻ bảng C tỉnh Quảng Bình năm 2009 Trong máy tính, để tiết kiệm bộ nhớ, người ta thường tìm cách nén dữ liệu. T...
-
Cho trước số nguyên dương n <10. Hãy in ra tất cả các hoán vị có n phần tử liên tục kể từ số 1. Ví dụ: n=3 ta có 6 hoán vị: 123, 132, 213...
-
Tìm số đảo ngược Y của một số X, biết Y gồm các chữ số của X và viết theo thứ tự ngược lại. Xuất ra kết quả là số Y mod 19 Input Output ...
-
Phân tích số nguyên dương thành tổng các số hạng của dãy Fibonaci sao cho ít số hạng nhất (các số hạng không được trùng nhau). Xem clip hư...
program ttn;
Trả lờiXóauses crt;
var n,m,a:array[1..1000] of longint;
i,j,d,p,g,t:longint;
begin
clrscr;
t:=0;
d:=0;
read(p,g);
for i:=1 to p do readln(n[i]);
for j:=1 to g do readln(m[j]);
for i:=1 to p do
begin
d:=d+1;
a[d]:=n[i];
end;
for j:=1 to g do
begin
d:=d+1;
a[d]:=m[j];
end;
for i:=1 to d-1 do
for j:=i+1 to d do
if a[i]>a[j] then
begin
t:=a[i];
a[i]:=a[j];
a[j]:=t;
end;
for i:=1 to d do writeln(a[i]);
readln;
end.