Viết chương trình in ra màn hình 5 dòng chữ "Xin chao cac ban "

2 câu trả lời

uses crt;

var i:byte;

begin

clrscr;

for i:=1 to 5 do

writeln('Xin chao cac ban');

readln

end.