Em hãy vận dụng kiến thức đã học về ngôn ngữ lập trình pascal, các em hãy viết một chương trình giúp một quán cơm tính tổng tiền thu được trong một ngày. Biết một dĩa cơm có giá tiền 15.000(đ) đồng giá. Còn số dĩa cơm bán được trong một ngày được nhập từ bàn phím
2 câu trả lời
uses crt;
var a:integer;
const gia=15000;
begin
write('nhap so dia com: ');readln(a);
writeln('Tong tien thu dc 1 ngay la: ',a*gia);
readln;
end.
Program ttc;
Uses crt;
Var n: integer;
Begin
Clrscr;
Write('Nhap so dia com ban duoc: ');
Readln(n);
Writeln('So tien thu duoc: ',n*15000);
Readln;
End.
Câu hỏi trong lớp
Xem thêm