uses crt;
begin
clrscr;
writeln('rat vui khi duoc lam quen voi cac ban');
writeln('day la bai kiem tra hoc ki 1 mon tin hoc lop 8');
writeln('chuong trinh Turbo Pascal rat la hay');
readln;
end.
chạy thử đi hay lắm
Program Love; (Tùy bn đặt nha)
Uses Crt;
Begin
Clrscr;
Writeln('rat vui duoc lam quen voi cac ban');
Writeln('day la bai kiem tra hoc ki 1 mon tin hoc lop 8');
Writeln('chuong trinh Turbo Pascal rat la hay');
Readln; ( dấu chấm phẩy có học ko cũng đc nha)
End.