Viết chương trình nhập vào số tiền N đồng sau đó đổi số tiền trên thành các tờ tiền 5000,2000,1000 sao cho số tiền là ít nhất
Mong các bạn giúp mình . Cảm ơn nhiều
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Bạn ơi!
Viết rõ là có thể đổi ra thành bao nhiêu tờ 10,5,2,1 đồng hay là có thể lấy bao nhiêu tờ 10,5,2,1 để tạo thành một số tiền bằng n vậy bạn?
Ví dụ như nhập n=30
thì xuất là 3 tờ 10; 6 tờ 5; 15 tờ 2; 30 tờ 1
hay là xuất 3 tờ 10
Số tiền lãi sau khi bán là :
50400000 - 45000000 = 5400000 ( đồng )
Tỉ số phần trăm giữa số tiền lãi và số tiền mua hàng là :
5400000 : 45000000 = 0,12 = 12%
Đáp số : 12%
Tk mk nha
Gọi số tờ giấy bạc 500 đồng, 2000 đồng, 5000 đồng lần lượt là: x(đồng),y(đồng),z(đồng) và x,y,z phải là số nguyên dương.
Theo đề bài, ta có:
x+y+z=540
x:y:z=\(\frac{1}{500}:\frac{1}{2000}:\frac{1}{5000}=20:5:2\)
Áp dụng tính chất của dãy tỉ số bằng nhau:
\(\frac{x}{20}=\frac{y}{5}=\frac{z}{2}=\frac{x+y+z}{20+5+2}=\frac{540}{27}=20\)
Vậy số tờ giấy bạc 500 đồng, 2000 đồng, 5000 đồng lần lượt là: 400 tờ,100 tờ, 40 tờ.
có gì bạn ko hiểu cứ hỏi mk nhé ^...^ ^_^
Gọi số tờ giấy bạc của 3 gói 500đ; 2000đ; 5000đ lần lượt là x; y; z
Ta có:
\(500x=2000y=5000z=\dfrac{500x}{10000}=\dfrac{2000y}{10000}=\dfrac{5000z}{10000}=\dfrac{x}{20}=\dfrac{y}{5}=\dfrac{z}{2}=\dfrac{540}{27}=20\)
\(\Rightarrow\dfrac{x}{20}=20\Rightarrow x=400\\ \dfrac{y}{5}=20\Rightarrow y=100\\ \dfrac{z}{2}=20\Rightarrow x=40\)
Vậy số tờ giấy bạc 500đ; 2000đ; 5000đ lần lượt là 400 tờ; 100 tờ; 40 tờ
{ đơn giá: a, số lượng: b}
uses crt;
var a,b,s,thanhtoan:integer;
begin
write('nhap gia don hang:');
read(a);
write('nhap so luong hang:');
s:=0;
thanhtoan:=0;
s:=a*b;
if s>100 then thanhtoan:= s*(30/100)
else thanhtoan:= s* (10/100);
write(' so tien can thanh toan la:',' ',thanhtoan);
readln;
end.
Program Đổi_Tiền;
var
loai5000,loai2000,loai1000,m,n: integer;
write('nhap so tien can doi :'); readln(n);
M:=n;
loai5000:= n div 5000; n:=n-loai5000*5000;
if n<>0 then
begin
loai2000 :=n div 2000; n:=n-loai2000*2000;
if n<>0 then
begin
loai1000:=n div 1000 ; n:=n-loai1000*1000;
end;
writeln(M , 'doi duoc thanh :' ,loai5000,' to 5000,' ,loai2000,' to 2000 ,' ,loai1000,' to 1000 ,');
readln;
end.
tích để ủng hộ mình nha