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