* Viết thuật toán :

- Input : số kwh

- Output : tiền điện 

* Thuật toán :

- Bước 1 : nhập số kwh (n)

- Bước 2 : t ← n * 1500;

- Bước 3 : đưa giá trị ra màn hình

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

* Viết chương trình :

program tinh;

uses crt;

var n, t : integer;

begin

clrscr;

write('nhap so dien nang tieu thu :');readln(n);

t := n * 1500;

writeln('so tien can tra la :', t);

readln

end.

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

-INPUT: số kwh

-OUTPUT: Số tiền điện

Viết thuật toán:

B1: Nhập so_kwh

B2: Tính số tiến với công thức (Tiền điện = số kwh * 1500)

B3: In KQ tính ở B2 ra

Viết CT: (Pascal)

program ct;
uses crt;
var sodien:Qword;
begin
    clrscr;
    writeln('Nhap so kwh:');readln(sodien);
    writeln('So tien dien la: ',sodien*1500,'đ');
    readln;
end.

_________________________

#Duahauvn