Input:  1KW=650đ; số chỉ mới,số chỉ cũ

Ouput s= tiền điện của một hộ phải trả

mô tả thuật toán

Bước1: nhập số chỉ mới x ,số chỉ cũ y

bước 2: s<- (x-y)*650;

bước 3: in ra kết quả và kết thúc thuật toán

 -Chương trình

Program Hotboy;

uses crt;

var x,y,s : integer;

begin

clrscr;

s:=0;

writeln('nhap so chi moi',x) ; readln(x);

writeln('nhap so chi cu',y); readln(y);

s:=(x-y)*650;

write('so tien ma mot ho gia dinh phai tra cho cong ti dien luc la',s);

readln

end.

input (Chỉ số mới - chỉ số cũ) x giá 1 Kw . Biết 1 Kw điện = 650 đ

output tiền điện của một hộ gia đình phải tra cho công ti điện lực;

 CT:

program saitama;

uses crt;

var a,b,c: real;

begin

writeln('nhap chi so moi va chi so cu: '); 

readln(a,b);

c:=(a-b)*650;

writeln('so tien dien ma gia dinh do phai tra la: ',c);

readln;

end.