Tí được phân công mua bút chì cho cả lớp nhân dịp đầu năm học mới. Số bút cần mua là n. TRong cửa hàng, giá mua lẻ mỗi chiếc bút là p. Tuy nhiên, Tí là học sinh nên được cửa hàng cho hưởng chính sách ưu đãi đầu năm học mới. Cụ thể: mỗi k chiếc bút mà Tí mua thì cậu sẽ được cửa hàng tặng thêm 1 cây nữa
VIẾT CHƯƠNG TRÌNH TÍNH SỐ TIỀN TỐI THIỂU TÍ CẦN MANG ĐỂ MUA N CHIẾC BÚT CHÌ
HELP ME, PLEASE!
uses crt;
var n,p,k,s:integer;
begin
write(‘Nhap so but can mua: ‘);readln(n);
write(‘Gia ban le: ‘);readln(p);
write(‘Nhap k: ‘);readln(k);
n:=n-(n div k);
s:=n*p;
writeln(‘So tien toi thieu can dem di: ‘,s);
readln
end.