Sau nhiều lần thương lượng Bờm đã quyết định bán cho Phú Ông chiếc quạt mo của mình với giá N đồng. Do Bờm không có tiền trả lại nên Phú Ông phải trả đúng N đồng. Trong túi Phú Ông có các tờ tiền mệnh giá 500, 1000, 2000 đồng. Hãy giúp Phú Ông đưa ra các cách trả tiền cho Bờm Yêu cầu: Viết chương trình đưa ra các cách trả tiền, (mỗi cách trên một dòng, nếu không có ghi chữ No). Với N là số nguyên dương nhập từ bàn phím Viết đơn giản thôi nha các bạn ơi mình mới học tới for to do thôi à
1 câu trả lời
Bạn có thể tham khảo code này (N nhập vào phải chia hết cho 1000):
uses crt;
var t1,t2,t3,n,i: integer;
begin
clrscr;
write('Nhap so tien: N='); readln(N);
i:=0;
for t1:= 0 to 10 do
for t2:= 0 to 5 do
for t3:= 0 to 2 do
begin
if N=(t1*1000+t2*2000+t3*5000) then
begin
i:=i+1;
writeln('Phuong an thu ',i,': 1K co ',t1,'; 2K co ',t2,'; 5K co ',t3);
writeln;
end;
end;
readln
end.
Câu hỏi trong lớp
Xem thêm
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
