Bạn Nam đi mua đồ dùng học tập : Vở và Viết ở cửa hàng A. Viết chương trình : Nhập số lượng vở và viết Nam đã mua và tính tổng số tiền mua đồ dùng. Biết rằng giá 1 quyển vở là 12000 đồng, giá 1 cây viết là 5000 đồng Cửa hàng A đang có chương trình khuyến mãi như sau : nếu tổng số tiền mua hành từ 100.000 trở lên đc giảm 30% . Nếu tổng số tiền dưới 100.000 thì được giảm 10% . Tính số tiền phải trả sau khi đã khuyến mãi của Nam. Làm cho mình phương trình trg Pascal với đề ở trên nha mình cảm ơn ạ!!
2 câu trả lời
uses crt;
var a, b: integer;
c: real;
begin
clrscr;
writeln('Nhap so luong vo da mua:');
readln(a);
writeln('Nhap so luong cay viet da mua:');
readln(b);
a:= 12000*a;
b:=5000*b;
c:=a+b;
if c>=100000 then c:=c*30/100 else c:=c*10/100;
writeln('So tien phai tra sau khi da khuyen mai la:', c:6:2);
readln;
end.
uses crt;
var sovo,soviet:integer;
tong:real;
Begin
clrscr;
Write('Nhap so vo ');Readln(sovo,);
Write('Nhap so viet ');Readln(soviet,);
tong:=sovo*12000+soviet*5000;
Write('so tien khi mua vo va viet la ',tong:5:0);
readln;
if tong>100000 then write('tong so tien phai tra khi da khuyen mai la ',tong-tong*3/10:5:2)
else write('tong so tien phai tra khi da khuyen mai la ',tong-tong*1/10:5:2);
Readln
end.
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết
- Đề thi học kì 2 môn địa 8 có lời giải chi tiết giúp các em luyện tập và củng cố kiến thức hiệu quả
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 5 Địa 8 có lời giải chi tiết
- Kiểm tra 15 phút lần 1 học kì 1 - đề số 4 Địa 8 có lời giải chi tiết
