$\text{Bài 2 :}$

$\text{program sksk;}$

$\text{uses crt;}$

$\text{var n, a, b, c : integer;}$

$\text{begin}$

$\text{clrscr;}$

$\text{write('nhap so hoc sinh :');readln(n);}$

$\text{write('nhap so tao :');readln(a);}$

$\text{b := a div n;}$

$\text{c := a mod n;}$

$\text{writeln('so tao moi ban nhan duoc la :', b);}$

$\text{writeln('so tao con du la :', c);}$

$\text{readln}$

$\text{end.}$

$\text{Bài 3 :}$

$\text{program tinh;}$
$\text{uses crt;}$
$\text{var b, c, n : integer;}$
$\text{begin}$
$\text{clrscr;}$
$\text{write('nhap so n :');readln(n);}$
$\text{b := (n mod 100) div 10;}$
$\text{c := (n mod 10 );}$
$\text{writeln('hai chu so cuoi cung cua ', n ,' la :', b,c );}$
$\text{readln}$
$\text{end.}$

bài 2

uses crt;

var quatao,hs:longint;

begin

clrscr;

readln(quatao,hs);

write('moi ban nhan duoc',quatao div hs);

write('so qua tao du',quatao mod hs);

readln;

end.

bài 3

uses crt;

var n:integer;

begin

clrscr;

readln(n);

writeln('hai so cuoi la',((n mod 100) div 10),' ',(n mod 10));

readln

end.