viết chương trình pascal .nhập vào hai dãy số nguyên .Hãy tìm các số thuộc dãy một mà không thuộc dãy hai

2588903631431305

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 27 xem

1 trả lời

Thích Trả lời

hangthuy076

Program BT;

Uses crt;

var a:array[1..100] of integer;

b:array[1..100] of integer;

begin

clrscr;

write('So phan tu cua day a la : ');readln(m);

for i:=1 to m do

begin

write('a[',i,']=');readln(a[i]);

end;

write('So phan tu cua day b la ');readln(n);

for i:=1 to n do

begin

write('b[',i,']=');readln(b[i]);

end;

for i:=1 to m do

for j:=1 to n do

if a[i]<>b[j] then write(a[i],b[j]);

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

tichphan2018

program bai_giai;
uses crt;
var A,B:array[1..10000] of integer;
n,m,i,j,d:integer;
begin
clrscr;
readln(n);
for i:=1 to n do read(A[i]);
readln(m);
for i:=1 to m do read(B[i]);
for i:=1 to n do
begin
d:=0;
for j:=1 to m do
if A[i]=B[j] then d:=d+1;
if d=0 then write(A[i],' ');
end;
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

y=3-x nghịch biến hay đồng biến vì sao

chuyển những câu sau sang câu bị động 1.they all voted the party a great success 2.we gave Ann some bananas and some flowers 3.they moved the fridge into the living room 4.she bought some cups of tea to the visitors in the next room 5.the find the new project worthless

Giải thích vì sao chế độ nước sông ở các khu vực Châu Á lại khác nhau

Phân tích : a.x ³-y ³+z ³+3xyz b.a ³+b ³-c ³+3abc c.x ³-y ³-z ³-3xyz d.m ³+n ³-p ³ e.(x-y-z) ³-x ³+y ³+z ³ f.2x^4-21x ²+1 g.2x ²-3xy-6y ²

Phân tích đa thức sau thành nhân tử: a) (a-b)^2-(b-a)(a-3b) b) 8^n+2 y^3-12^4y^3 c)(x-9)(x-7) d)(x^2+x-1)^2-4x^2+4x e)x^6-y^6 f)(x+2y-3)^2-4(x+2y-3)+4 g)(x^2y^2-17)^2-4(xy-4)^2 h)(x-y)^3-1-3(x-y)(x-y-1) i)(x+2)^3+(x-3)^3 l)x^3y^3+125 Tìm các cặp số nguyên x y thỏa mãn điều kiện sau : a)x(y+1)-y=1 b)x(x-2)-(2-x)y-2(x-2)=3 Biết x+2y=5. Tìm tập hợp các ước nguyên của: A=7(x+2y)+3(x-2y)-(x+2y)

Mọi ng giúp e làm vài anh này với

cho 10g một hỗn hợp gồm Fe và Cu tác dụng với dụng dịch HCL thì thu được 3,36 litd khí H2 (đktc). Xác định thành phần % về khối lượng của mỗi kim loại trong hỗn hợp đầu.

5 hộp đinh 5 phân và 7 hộp đinh 10 phân cân nặng 335kg. 7 hộp đinh 5 phân và 4 hộp đinh 10 phân cân nặng 295kg. Hỏi 1 hộp đinh mỗi loại nặng bao nhiêu kí lô gam Ai giải giùm e lời giải của toán tiểu học

Mấy bạn làm giúp mình với Phần này khó hiểu quá"Tương giao của 2 đồ thì lớp 12"

Em hiện học lớp 11 và cực yếu môn anh văn ai có thể cho em biết em cần làm gì để cải thiện ạ

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến