1 bạn cần mua n cánh hoa hồng. Tại cửa hàng bán hoa giá của 1 cành hoa là m(đồng). Tuy nhiên, cửa hàng có chính sách giảm giá nếu khách hàng mua a cành hoa hồng trở lên thì giá bán giảm 25%. Nhập: m,n,a
Xuất ra:
n=15 n=30
m=1000 m=1000
a=20 a=10
=> Khi đó: T:= 15000 => Khi đó:...
Đọc tiếp
1 bạn cần mua n cánh hoa hồng. Tại cửa hàng bán hoa giá của 1 cành hoa là m(đồng). Tuy nhiên, cửa hàng có chính sách giảm giá nếu khách hàng mua a cành hoa hồng trở lên thì giá bán giảm 25%. Nhập: m,n,a
Xuất ra:
n=15 n=30
m=1000 m=1000
a=20 a=10
=> Khi đó: T:= 15000 => Khi đó: T:=22500
uses crt;
var n,m,a:integer;
Begin
clrscr;
write('Nhap n:'); readln(n);
write('Nhap m:'); readln(m);
write('Nhap a:'); readln(a);
write('T=');
if n<a then writeln(n*m) else writeln(n*m*75/100:0:0);
readln;
End.