cửa hàng KT mới mở dịch vụ bán hoa sỉ và lẻ. họ cần quản lý số hóa đơn bán hoa nên cần 1 phần mềm thực hiện công việc tính tiền bán hoa cho khác hàng khi mua hoa tại cửa hàng. Với cách tính như sau : giá bán lẻ 5000đ/hoa
giá bán sỉ 3000đ/hoa ( từ 100 bông trở lên tính sỉ)
Hãy viết chương trình bằng ngôn ngữ pascal để thực hiện đề trên.
chỉ nhập 1 số hoa hay nhập nhiều số hoa đã bán?
program bai1;
var
begin
write('So hoa ban la ');readln(hoa);
if hoa>=100 then
begin
tien:=3000;
thanhtien:=tien*hoa;
writeln('So tien la ',thanhtien);
end;
else
begin
tien:=5000;
thanhtien:=tien*hoa;
writeln('So tien la ',thanhtien);
end;
readln
end.
