Viết chương trình vẽ hai hình chữ nhật

1 câu trả lời

Program baitap;

Uses crt;

Var i:integer;

Begin

Clrscr;

For i:=1 to 2 do

   Begin

   Writeln('*******************');

   Writeln('*                                   *');

   Writeln('*                                   *');

   Writeln('*******************');

   End;

Readln

End.

Câu hỏi trong lớp Xem thêm