Lập chương trình thực hiện yêu cầu sau: Anh Việt đi chợ mua một mặt hàng có giá trị là N đồng. Trong túi anh Việt có nhiều tờ tiền với mệnh giá là 100 đồng, 20
Lập chương trình thực hiện yêu cầu sau: Anh Việt đi chợ mua một mặt hàng có giá trị là N đồng. Trong túi anh Việt có nhiều tờ tiền với mệnh giá là 100 đồng, 200 đồng và 1000 đồng. Anh Việt có thể có nhiều cách trả tiền để mua mặt hàng đó (anh Việt chỉ dùng các tờ tiền mà anh có sẵn. Anh không đưa thừa tiền cho người bán vì người bán không có tiền trả lại). Yêu cầu: nhập vào từ bàn phím số N (N nguyên và 2<N<100 000); đưa ra màn hình tất cả các cách trả tiền của anh Việt thỏa mãn. (Mỗi cách trả tiền trên một dòng, nếu không có cách thì không cần thông báo gì)
Lời giải 1 :
Program SoTien;
Uses Crt;
Var i, j, x, y, z; longint;
Begin
clrscr;
Write('Nhap so tien: '); Readln(i);
j:=0;
If i mod 100=0 Then
For x:=0 to i div 1000 do
For y:=0 to (i-1000*x) div 200 do
Begin z:=(i-1000*x-200*y) div 100;
Writeln(z,' x 100 +',y,' x 200 + ',x,' x 1000');
End;
readln;
End.
Thảo luận
Lời giải 2 :
var n,a,b,c,d:longint;
begin
write('nhap n ' );readln(n);
d:=0;
for a:=0 to n div 100 do
for b:=0 to n div 100 do
for c:=0 to n div 100 do
if a*100+b*200+c*1000 =n then
begin
writeln(a,' ',b,' ',c);
inc(d);
end;
if d<>0 then write(d);
readln
end.
Có thể bạn quan tâm
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 :))Copyright © 2021 HOCTAP247