PROGRAM Lap;
VAR i: INTEGER;
BEGIN
FOR i:=1 TO 10 DO
writeln('Day la lan lap thu ',i);
Readln
END.
Download: http://www.mediafire.com/?j37cc7vsbb7w27c
VAR i: INTEGER;
BEGIN
FOR i:=1 TO 10 DO
writeln('Day la lan lap thu ',i);
Readln
END.
Download: http://www.mediafire.com/?j37cc7vsbb7w27c