viết trương trình tiền sách khi biết sách=đongia*soluong đơn giá và số lượng được nhập từ bàn phím free pascal
2 câu trả lời
Program baitap;
Uses crt;
Var sach,dg:longint;
sl:integer;
Begin
Clrscr;
Write('Nhap don gia:'); Readln(dg);
Write('Nhap so luong:'); Readln(sl);
sach:=dg*sl;
Writeln('Tien sach:',sach);
Readln
End.
Program tinh_tien;
Uses crt;
Var sach,soluong,dongia:integer;
Begin
Write('So luong la: '); Readln(soluong);
Write('Don gia la: '); Readln(dongia);
sach:=dongia*soluong;
Write('So tien phai tra la: ', sach);
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
