Xác định bài toán :

Input : Số lượng đơn giá của một mặt hàng 

Output : Tổng số tiền của mặt hàng đó

Mô tả thuật toán :

Bước 1 : Nhập sl, dg 

Bước 2 : t ← sl*dg;

Bước 3 : xuất giá trị t ra màn hình

Bước 4 : kết thúc

Viết chương trình :

program tinh;

uses crt;

var sl, dg, t : integer;

begin

clrscr;

write('nhap so luong cua mat hang :');readln(sl);

write('nhap don gia cua mat hang :');readln(dg);

t := sl * dg;

writeln('tong so tien phai tra chomat hang do la :', t);

readln

end.

Xác định bài toán :
Input : số lượng và đơn giá của mặt hàng 
Output : số tiền cần trả cho mặt hàng đó

Mô tả thuật toán :
Bước 1 : nhập số lượng, đơn giá của một mặt hàng 
Bước 2 : t ← sl * dg;
Bước 3 : đưa ra màn hình t ( số tiền cần trả )
Bước 4 : kết thúc

Viết chương trình :
program tinh;
uses crt;
var sl, dg, t : integer;
begin
clrscr;
write('so luong mat hang  :');readln(sl);
write('don gia cua  mat hang :');readln(dg);
t := sl * dg;
writeln('so tien phai tra cho mat hang la  :', t);
readln
end.