DIỄN ĐÀN TRƯỜNG THPT QUỐC OAI

DIỄN ĐÀN TRAO ĐỔI HỌC TẬP, BÀI GIẢNG CỦA HỌC SINH VÀ GIÁO VIÊN TRƯỜNG THPT QUỐC OAI
 
Trang ChínhPortalGalleryTìm kiếmThành viênNhómĐăng kýĐăng NhậpTrợ giúpCalendar

Share | 
 

 VẼ NHÀ TRONG PASCAL

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
jika0

avatar

Tổng số bài gửi : 7
Join date : 09/01/2010
Age : 24
Đến từ : Quoc oai

Bài gửiTiêu đề: VẼ NHÀ TRONG PASCAL   13/1/2010, 5:42 pm

program venha; {cái này không có cũng được}
uses crt,graph;
var Gd,Gm: integer;
begin
Gd;= Detect;
initGraph (Gd,Gm,' ');
OutTextXY (120,50,'ve ngoi nha:');
Rectangle (220,200,420,330);
Rectangle (250,230,300,330);
Rectangle (330,230,390,280);
moveto (220,200);
lineto(180,200);
lineto(220,140);
lineto(420,140);
lineto(460,140);
lineto(420,200);
readln;
closeGraph;
end.
Về Đầu Trang Go down
Xem lý lịch thành viên http://www.me.zing.vn/profile/jika0-vm
 
VẼ NHÀ TRONG PASCAL
Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 1 trang
 Similar topics
-
» GTA IV (PC) DVDrip

Permissions in this forum:Bạn không có quyền trả lời bài viết
DIỄN ĐÀN TRƯỜNG THPT QUỐC OAI  :: Lớp 11 :: Tin học-
Chuyển đến