PROGRAM PHEP_CHIA;VAR X,Y

Bài 6:

Program phep_chia;

Var x,y : integer;

Kq: read;

Begin

Write('nhap so x'); readln(x);

Write('nhap so y'); readln(y);

Kq:=x/y;

Write(' ket qua cua phep chia la',kq:10:2);

Readln;

End.

Dặn dò :

Đọc trớc bài luyện gõ bàn phím nhanh với finger break out (phần 2)