Pascal hai bạn chọn mua vở.với giá 8000₫ /quyển, bút 30000/chiếc. Cửa hàng có khuyến mãi cứ mỗi 100000 đ được giảm 1000 đ. Viết chương trình tính sồ t

Pascal
hai bạn chọn mua vở.với giá 8000₫ /quyển, bút 30000/chiếc. Cửa hàng có khuyến mãi cứ mỗi 100000 đ được giảm 1000 đ. Viết chương trình tính sồ tiền 2 bạn phải trả khi mua m quyển vở và n chiếc bút. Tin học 8
Gợi ý nho nhỏ :)))
Số tiền phải trả= (m*8000+n*30000);
Số tiền được giảm=số tiền phải trả div 10;
Số tiền thực trả= số tiền phải trả-số tiền được giảm

0 bình luận về “Pascal hai bạn chọn mua vở.với giá 8000₫ /quyển, bút 30000/chiếc. Cửa hàng có khuyến mãi cứ mỗi 100000 đ được giảm 1000 đ. Viết chương trình tính sồ t”

  1. var

    m,n,t,s:integer;

    begin

    read(m,n);

    t:=(m*8000+n*30000); {Số tiền phải trả}

    s:=t div 10; {Số tiền được giảm}

    write(t-s); {In ra số tiền thực trả}

    end.

    Bình luận
  2. var

    m,n,t,s:integer;

    begin

    read(m,n);

    t:=(m*8000+n*30000); {Số tiền phải trả}

    s:=t div 10; {Số tiền được giảm}

    write(t-s); {In ra số tiền thực trả}

    Bình luận

Viết một bình luận