Hai số nguyên gọi là họ hàng với nhau nếu chúng có chung ít nhất một chữ số (không nhất thiết phải cùng vị trí). Yêu cầu : Hãy đếm xem có bao nhiêu cặp số họ

Câu hỏi :

Hai số nguyên gọi là “họ hàng với nhau” nếu chúng có chung ít nhất một chữ số (không nhất thiết phải cùng vị trí).

Yêu cầu : Hãy đếm xem có bao nhiêu cặp số họ hàng với nhau trong một danh sách số cho trước.

Dữ liệu vào: File text, tên file là HOHANG.INP. Dòng đầu gồm số N (2≤ N ≤100). Dòng tiếp theo ghi N số số nguyên dương a_i (0< a_i≤10⁸).

Dữ liệu ra : File text, tên file HOHANG.OUT gồm duy nhất một số nguyên là số cặp tìm được.

code pas nha .plss

Lời giải 1 :

var n,i,j,d,x,y:integer;
a: array[1..100] of integer;
d1,d2:set of 0..9;
f: text;
begin
assign(f, 'HOHANG.INP');reset(f);
readln(f, n);
for i := 1 to n do 
read(f,a[i]);
close(f);
d:=0;
for i:=1 to n-1 do
for j:=i+1 to n do
begin
d1:=[]; 
d2:=[];
x:=a[i]; 
y:=a[j];
while x>0 do
begin
d2:=d2+[x mod 10];
x:=x div 10;
end;
while y>0 do
begin
d2:=d2+[y mod 10];
y:=y div 10;
end;
for x in d1 do
if x in d2 then
begin
inc(d);
break;
end;
end;
assign(f, 'HOHANG.OUT'); rewrite(f);
writeln(f, d);
close(f);
end.

Bạn có biết?

Tin học là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng. Tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin. Hãy tận dụng sức mạnh của tin học để giải quyết các vấn đề và sáng tạo ra những giải pháp mới!

Nguồn :

Wikipedia - Bách khoa toàn thư

Tâm sự lớp 9

Lớp 9 - Là năm cuối ở cấp trung học cơ sở, chúng ta sắp phải bước vào một kỳ thi căng thẳng và sắp chia tay bạn bè, thầy cô. Áp lực từ kỳ vọng của phụ huynh và tương lai lên cấp 3 thật là lớn, nhưng hãy tin vào bản thân và giữ vững sự tự tin!

Nguồn :

sưu tập

Hai số nguyên gọi là họ hàng với nhau nếu chúng có chung ít nhất một chữ số (không nhất thiết phải cùng vị trí). Yêu cầu : Hãy đếm xem có bao nhiêu cặp số họ

Lời giải 1 :

Bạn có biết?

Nguồn :

Tâm sự lớp 9

Nguồn :

Có thể bạn quan tâm