Bạn Tú muốn mua tặng các bạn món quà nhân dịp họp lớp,Tú muốn mua hai món quà có tổng giá trị lớn nhất và không vượt quá số tiền trong người. Yêu cầu: tìm số quà có tổng giá trị lớn nhất,nếu không mua được thì in ra số 0 Dữ liệu vào: nhập N và X Dữ liệu ra: 1 số nguyên dương ghi

huynhngocvannhi20122002

2 năm trước

Bạn Tú muốn mua tặng các bạn món quà nhân dịp họp lớp,Tú muốn mua hai món quà có tổng giá trị lớn nhất và không vượt quá số tiền trong người. Yêu cầu: tìm số quà có tổng giá trị lớn nhất,nếu không mua được thì in ra số 0 Dữ liệu vào: nhập N và X Dữ liệu ra: 1 số nguyên dương ghi ra tổng giá trị lớn nhất Vd: 4 16 3 10 4 7 In ra 14

Loga Sinh Học lớp 12

0 lượt thích 23 xem

1 trả lời

Thích Trả lời

thaodo705

program pht;
uses crt;
var A: array[1..100000000] of longint;
x, n, max, i, j, t, s, d: longint;
begin
clrscr;
write('Nhap so qua: '); readln(n);
write('Nhap so tien: '); readln(x);
for i:=1 to n do
begin
write('Gia tri qua thu ', i, ': '); readln(A[i]);
end;
for i:=1 to n do if A[i]>x then d:=d+1;
if d=n then write('0') else
begin
max:=A[1];
for i:=1 to n do if max>A[i] then max:=A[i];
for i:=1 to n do if (max<A[i]) and (A[i]<x) then max:=A[i];
for i:=1 to n-1 do
for j:=1+i to n do if A[i]<A[j] then
begin
t:=A[i];
A[i]:=A[j];
A[j]:=t;
end;
i:=1;
repeat
begin
s:=0;
s:=max+A[i];
i:=i+1;
end;
until s<=x;
write(s);
end;
readln
end.

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

Trang0909

uses crt;
var a:array[1..1000] of word;
n,i,j,x,max:word;
procedure tinh;
var t:longint;
begin
t:=a[i]+a[j];
if (t>max) and (t<=x) then
max:=t;
end;
begin
clrscr;
readln(n,x);
for i:=1 to n do read(a[i]);
readln;
max:=0;
for i:=1 to n-1 do
for j:=i+1 to n do
tinh;
writeln(max);
readln;
end.

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

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

giúp mình trình bày c29 theo kiểu tự luận. còn phần B thì làm giúp mình 2câu đầu. làm đc câu 4 càng tốt ạ

tìm 10 từ có vần /br/ và 10 từ có vần /pr/ tiếng anh Gíup mình nhanh .

CHUYỂN SANG CÂU CHỦ ĐỘNG 3. The road in front of my house has been paved. 1. You can see that the dishes haven’t been washed. CHUYỂN SANG CÂU BỊ ĐỘNG 3. Thomas Edison invented the phonograph in 1877. 4. The police found two children in the forest. VIẾT LẠI CÂU VỚI NGHĨA KHÔNG ĐỔI 1. The movie was very bad. I couldn’t see it. The movie was not good enough for me to see 2. “Shut the door but don’t lock it”, he said to us. He asked us to shut the door but not to lock it SẮP XẾP LẠI CẤU 1. Thuy’s mother/ want/ her/ turn off/ the TV/ yesterday. 2. I/ glad/ that/ you/ just/ pass/ the exam. 3. Lan/ person/ always/ help/ poor children.

một xe ô tô du lịch chạy từ thủ đô hà nội vào thành phố hồ chí minh hết 3 ngày ngày đầu chạy từ hà nộ vào huế được 654km ngày thứ hai chạy từ huế vào nha trang được 626km ngày thứ ba chạy từ nha trang vào thành phố hồ chí minh được 439km hỏi trung bình mỗi ngày xe đó chạy được bao nhiêu km

Vẽ Đầu Mầm cười sặc NL:30/2 trả Nợ

Câu 2 á mng giúp mình với cần gấp lắm có cả câu bị động nha cảm ơn mng

Đôi khi cũng thắc mắc lắm Không hiểu vì sao khi nín thở thì lại bị khó thở Vẽ anime NAM (digi)

Can thứ nhất đựng 12 lít nước. Can thứ hai đựng 16 lít nước. Hỏi can thứ ba đựng bao nhiêu lít nước? Biết trung bình mỗi can đựng 15 lít nước

Bài tập1: Tìm và cho biết tác dụng của câu đặc biệt, câu rút gọn trong những trường hợp sau: a) Hôm nay. Nam đã là tiến sĩ. b) Anh ấy đi khi nào? - Hôm nay Bài tập 2: Tìm trạng ngữ và cho biết công dụng của các trạng ngữ trong các câu văn sau: a) Sáng tinh mơ, mẹ tôi đã dậy nấu nướng. b) Trên đường về nhà, chúng em gặp bạn Nam. c) Anh ấy nhanh chóng tìm ra lời giải bằng trí thông minh của mình. d) Chúng ta cần chăm chỉ học hành để mai sau xây dựng đất nước. e) Như một luồng gió lốc, bốn chiếc máy bay nối đuôi nhau ào tới. g) Vì ốm, bạn Nam phải nghỉ học bốn ngày. Bài tập 3: Tìm cụm chủ - vị mở rộng câu và cho biết cụm chủ vị có vai trò gì? a) Con mèo chạy làm đổ lọ hoa. b) Ngôi nhà này cửa rất rộng. c) Tôi thích bức tranh bạn Hùng lớp tôi sẽ chiến thắng. e) Cây xoài ông tôi trồng đang ra quả

Cho em hỏi phức của đồng có kết tủa không ạ?

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