BÀI TẬP 11: MUA BÚT CHÌ

Cu 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 chì cần mua là N. Trong cửa hàng, giá mua lẻ  mỗi chiếc bút chì là p. Tuy nhiên cu Tí là học sinh giỏi 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ể cứ là mỗi k chiếc bút chì mà cu Tí mua thì cậu ta sẽ được cửa hàng tặng thêm cho một chiếc bút chì nữa.

        Yêu cầu: Xác định số tiền tối thiểu mà cu Tí cần mang theo để có thể tới cửa hàng mang về ít nhất N chiếc bút chì.

        Dữ liệu: Nhập vào 3 số nguyên dương n, k, p ≤ 10⁹

        Kết quả: Ghi ra màn hình số tiền tối thiểu cần mang theo.

        Ví dụ:     

Nhập	Kết quả
36 5 5	150

    CODE THAM KHẢO:

program Mua_but_chi;

uses crt;

var n,k: longint;

    T,p: real;

begin

    clrscr;

    write('Nhap N = '); readln(n);

    write('Nhap k = '); readln(k);

    write('Nhap p = '); readln(p);

    T:=(n-n/(k+1))*p;

    write(round(t));

    readln;

end.