Câu lệnh ghép là một câu lệnh được hợp thành từ nhiều câu lệnh thành phần (đơn hoặc kép).

Biểu diễn: begin <câu lệnh>; end;

vd while i<=10 do 

begin

i:=i+1;

S:=S+i;

end;

VD :

program tuoi_cha_con;

uses crt;

var tuoicha, tuoicon, nam: longint;

begin

clrscr;

write('Nhap tuoi cha va con(tuoicha-tuoicon>=25) ;

readln(tuoicha,tuoicon); nam:= 0;

while tuoicha<>2*tuoicon do begin

tuoicha:= tuoicha + tuoicon := tuoicon + 1; nam:= nam +1;

end;

writeln ( ' Sau ' , nam, ' nam, tuoi cha gap doi tuoi con' );

readln

End.

Vd là tính tuổi cha con

                         #NOCOPY#                      

Câu lệnh ghép là một câu lệnh được hợp thành từ nhiều câu lệnh thành phần (đơn hoặc kép). Câu lệnh ghép nhằm thực hiện thao tác gồm nhiều thành phần. Mỗi  thành phần là một câu lệnh đơn hoặc câu lệnh ghép khác. 

Biểu diễn: begin <câu lệnh>; end;

vd while i<=10 do 

begin

i:=i+1;

S:=S+i;

end;

⇒ trong câu lệnh có câu lệnh khác nhưng câu lệnh này lại là một chương trình khác với câu lệnh >=2 được thực hiện