Trang chủ Tin Học Lớp 8 Ông An đến dự tiệc, buổi tiệc có N người...

Ông An đến dự tiệc, buổi tiệc có N người (0<N<50000). Mỗi người được cài lênáo mỗi bông hoa trên đó có ghi một con số nguyên X (X<106) cho biết người

Câu hỏi :

Ông An đến dự tiệc, buổi tiệc có N người (0<N<50000). Mỗi người được cài lênáo mỗi bông hoa trên đó có ghi một con số nguyên X (X<106) cho biết người khách đó sẽ dự tiệc phòng X. Hầu hết tất cả các phòng đều có số lượng kháchchẵn, duy nhất một phòng có lượng khách là lẽ. Để đảm bảo đủ cặp cho tiệc Khiêuvũ nên BTC quyết định tìm phòng khách có số lượng người là lẽ để ghi số cho Ông An . Em hãy giúp BTC giải quyết điều đó. Dữ liệu vào: Tệp Dutiec.inp gồm n+1 dòng, dòng đầu tiên là số N, n dòng tiếp theo mỗi dòng ghi một số nguyên dương cho biết con số ghi trên áo người khách thứ i. Kết quả: ghi vào tệp Dutiec.out gồm con số duy nhất là phòng có số lượng khách lẻ. Dutiec.inp Dutiec.out 5 3 1 2 2 3 1

Lời giải 1 :

var n,i,j:longint;
    a,d:array[0..50000] of longint;
begin
        assign(input,'dutiec.inp'); reset(input);
        assign(output,'dutiec.out'); rewrite(output);
        read(n);
        for i:=1 to n do
        begin
                read(a[i]);
                inc(d[a[i]]);
        end;
        for j:=1 to n do
        begin
                if (d[j] mod 2 = 1) then write(j);
        end;
end.

//ProDev

//Thuật toán:mảng đếm

Thảo luận

-- pas nha bạn bạn làm lại giúp mình với
-- ok
-- xin ctlhn(minhf trả lời đầu tiên:()

Lời giải 2 :

uses crt;
var n,i: integer;
    a,x: array[1..500000] of integer;
    fi,fo: text;
begin
    assign(fi,'Dutiec.inp'); reset(fi);
    assign(fo,'Dutiec.out'); rewrite(fo);
    readln(fi,n);
    for i:=1 to n do begin
        readln(fi,a[i]);
        inc(x[a[i]]);
    end;
    for i:=1 to n do if x[i] mod 2 <> 0 then begin
        write(fo,i);
        break;
    end;
    close(fi);
    close(fo);
end.

Bạn có biết?

Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, 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 (ảo). Với cách hiểu hiện nay, 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.

Nguồn : Wikipedia - Bách khoa toàn thư

Tâm sự 8

Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!

Nguồn : ADMIN :))

Liên hệ hợp tác hoặc quảng cáo: gmail

Điều khoản dịch vụ

Copyright © 2021 HOCTAPSGK