YOMEDIA
NONE

Tâm mở một cửa hàng bán văn phòng phẩm. Trong ngày khai trương, để ”mua may bán đắt”, Tâm quan niệm rằng khi khách hàng mua một sản phẩm nào đó thì phải trả đúng với số tiền của sản phẩm để Tâm không phải trả lại tiền thừa cho khách hàng.

Nam là bạn thân của Tâm đến mua hàng. Nam hiện có N tờ tiền, mỗi tờ tiền M đều có giá trị khác nhau. Giả thiết rằng với số tiền của Nam hiện có đều có thể mua được một số sản phẩm trong cửa hàng.

Yêu cầu: Vì Nam không quen với việc tính toán, em hãy giúp Nam tính xem với N tờ tiền như vậy thì Nam không thể mua sản phẩm có giá trị nhỏ nhất (Min) là bao nhiêu?

Dữ liệu vào: File văn bản BUY.INP

Dòng thứ nhất là số N (0Dòng thứ hai có N tờ tiền, mỗi tờ tiền M cách nhau một khoảng trắng (0Dữ liệu ra: File văn bản BUY.OUT

- Gồm một số nguyên dương Min cần tìm.

Ví dụ:

BUY.INP BUY.OUT

5

1 2 4 9 100 8

b)

3 7

1 2 3

Theo dõi Vi phạm
ATNETWORK

Trả lời (1)

  • trang lan

    uses crt;

    var a,b:array[1..1000]of longint; d:text; i,j,n,k,t,kt,ktt:longint;

    begin

    clrscr;

    assign(d,'input.pas');reset(d);

    readln(d,n);

    for i:=1 to n do read(d,a[i]);

    k:=0;

    for i:=1 to n do

    begin

    t:=0;

    for j:=i to n do

    begin

    t:=t+a[j];

    inc(k,3);

    b[k-2]:=i;

    b[k-1]:=i+j;

    b[k]:=t;

    end;

    end;

    // for i:=1 to k do write(b[i],';'); writeln;

    kt:=0;

    i:=0;

    repeat

    inc(i); ktt:=0;

    for j:=1 to k do If i=b[j] then ktt:=1;

    if ktt=0 then kt:=1;

    until kt=1;

    writeln(i);

    close(d);

    readln

    end.

      bởi trang lan 18/11/2021
    Like (0) Báo cáo sai phạm
Cách tích điểm HP

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
NONE

Các câu hỏi mới

AANETWORK
 

XEM NHANH CHƯƠNG TRÌNH LỚP 11

 

YOMEDIA
ATNETWORK
ON