Bước 1: Xác định bài toán

     Input: s và t

     Output: v

Bước 2: Thuật toán

     B2.1: Nhập s; t

     B2.2: Tính v<-s/t

     B2.3: Xuất v

Bước 3: Viết chương trình bằng NNLT Pascal

Uses crt;
Var 
    s,t,v: real;
Begin
    clrscr;
    write('Nhap quang duong (km): '); readln(s);
    write('Nhap thoi gian (h): '); readln(t);
    v:=s/t;
    writeln('Van toc la (km/h): ',v:0:2);
    readln;
End.

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

- Input : số km (s), thời gian (t)

- Output : Tốc độ trung bình 

* Mô tả thuật toán :

- Bước 1 : nhập quãng đường s, thời gian t

- Bước 2 : tb ← s / t

- Bước 3 : đưa ra giá trị tb

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

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

uses crt;

var s, t, tb : real;

begin

clrscr;

write('nhap quang duong va thoi gian : ');readln(s, t);

tb := s / t;

writeln('toc do trung binh : ', tb:2:1);

readln;

end.