ai bày mình cách tính tiền thanh toán khi mua 2 mặt hàng trong pascal với ạ 1.máy bơm nước: đơn giá :650000đ phí:100000đ 2.quạt điện: đơn giá:120000đ

ai bày mình cách tính tiền thanh toán khi mua 2 mặt hàng trong pascal với ạ
1.máy bơm nước:
đơn giá :650000đ
phí:100000đ
2.quạt điện:
đơn giá:120000đ
phí:60000đ
giúp mình với ạ
mình cần gấp

0 bình luận về “ai bày mình cách tính tiền thanh toán khi mua 2 mặt hàng trong pascal với ạ 1.máy bơm nước: đơn giá :650000đ phí:100000đ 2.quạt điện: đơn giá:120000đ”

  1. program tinh_tien;

    uses crt;

    var d,m,s,t:integer;

    begin

    clrscr;

    write(‘Nhap don gia la d’);readln(d);

    write(‘Nhap so luong la m’);readln(m);

    s:=d*m;

    t:=s*10%;

    s:=s+t;

    writeln(‘So tien phai tra:’,s);

    readln ;

    end .

    @chúcbạnhọctốt@

    Bình luận

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