viết chương trình pascal tính tiền hóa đơn mua 1 món hàng biết rằng: thành tiền = hóa đơn số lượng+ phí ship:10k

2 câu trả lời

program kaito;

uses crt;

var dongia, soluong, thanhtien: real;

const ship=10000;

begin

   clrscr;

   write('Don gia: '); readln(dongia);

   write('So luong: '); readln(soluong);

      thanhtien:=dongia*soluong+ship;

   writeln('So tien can tra la: ',thanhtien);

   readln

end.

program hoa_don;
uses crt;
var a, b : integer;
const p = 10000;
begin
clrscr;
write('nhap hoa don :');readln(a);
write('nhap so luong hang :');readln(b);
writeln('so tien ban can tra la :', a*b + p);
readln
end.

Câu hỏi trong lớp Xem thêm