Tìm kiếm
Latest topics
» Mọi người vào đây nhéby lan Fri Oct 15, 2010 8:04 am
» NGU!!!!!!!
by tuan_anh8546 Sun Oct 10, 2010 10:46 am
» aaaaaaaaaaa
by hy Sat Aug 21, 2010 8:35 pm
» Tâm lớp minh
by £¥€†—ðµØñ§ Wed Mar 03, 2010 4:23 pm
» Nếu tôi là người em yêu
by conic_sg Tue Mar 02, 2010 9:41 pm
» Cho tớ hỏi:Admin đâu????
by Cadic Thu Jan 28, 2010 10:32 am
» Kế hoạch kinh doanh
by chutt_tt Tue Jan 26, 2010 12:41 pm
» driver packs 2010
by linhhahaduc Mon Nov 30, 2009 1:26 pm
» Kiểm tra tin full 20 cau !! Danh sách nghịch
by £¥€†—ðµØñ§ Mon Nov 30, 2009 12:04 am
» Bài kiểm tra 45p (Từ câu 6 -> 14) Danh sách thuận
by linhhahaduc Mon Nov 23, 2009 10:54 pm
Help me!!!
5 posters
Trang 1 trong tổng số 1 trang
Help me!!!
Nếu muốn xóa các phần tử ở vị trí chẵn trong mảng mà không dùng mảng mới thì phải làm sao? Các ấy yêu quí giúp tớ với!
loptruong- Trung Sĩ
Re: Help me!!!
con thử cho i chạy nhé, nếu i mod 2 =0 thì ko in ra ngược lại thì in ra màn hình
[S]uper_[S]tupid- Moderator
Re: Help me!!!
không phải in , mà là xóa hẳn hoi
Đây là code của tớ ( hơi đặc biệt, ý bài này giống bài in tam giác pascal chỉ dùng 1 mảng là for từ cuối lên )
for i:= n downto 1 do
if i mod 2=0 then
for j:=i to n-1 do
a[j]:=a[j+1];
n:= n - n div 2;
for i:=1 to n do write(a[i]:3 );
Đây là code của tớ ( hơi đặc biệt, ý bài này giống bài in tam giác pascal chỉ dùng 1 mảng là for từ cuối lên )
for i:= n downto 1 do
if i mod 2=0 then
for j:=i to n-1 do
a[j]:=a[j+1];
n:= n - n div 2;
for i:=1 to n do write(a[i]:3 );
linhhahaduc- Trung Sĩ
Re: Help me!!!
Lượng dạo này pro Pascal thế nhỉ!!!
ghê thật, vậy mà từ trước đến nay giấu tài kĩ thế
ghê thật, vậy mà từ trước đến nay giấu tài kĩ thế
Mr.Hoang- Moderator
Re: Help me!!!
Bì của Đức Anh B tui đọc chẳng hiểu gì cả.
Mà từ trước đến nay tui đều hok đọc đc bài người khác, cứ thấy khó hiểu thế nào ý!!!
Mà từ trước đến nay tui đều hok đọc đc bài người khác, cứ thấy khó hiểu thế nào ý!!!
Mr.Hoang- Moderator
Re: Help me!!!
tôi dựa theo nguyên tắc, muốn xóa phần tử nào thì gán đè những phần tử sau nó lên trước, và giảm n đi 1
linhhahaduc- Trung Sĩ
Re: Help me!!!
tui nhớ bài đó tui cost rùi đó, chắc vẫn còn lưu trong máy.
nếu ông cần tui gửi cho!
nếu ông cần tui gửi cho!
Mr.Hoang- Moderator
Re: Help me!!!
Cảm ơn mọi người nhiều! Mà Đức Anh cho tớ thành nữ quái từ bao giờ thế nhỉ?
loptruong- Trung Sĩ
pro gì
tại bài này dễ nên mới làm được chứ trình em vẫn gà mà anhMr.Hoang đã viết:Lượng dạo này pro Pascal thế nhỉ!!!
ghê thật, vậy mà từ trước đến nay giấu tài kĩ thế
Luong1993pro- Moderator
Re: Help me!!!
Bác ơi, bác không hiểu ý em rồi. Xóa hẳn phần tử ở trong mảng mà. Sau đó mới in lại ra màn hình.
loptruong- Trung Sĩ
Re: Help me!!!
Nếu chỉ in ra không thì em hỏi mọi người làm gì. Thay đổi mảng luôn ấy. Bác có hiểu không?
loptruong- Trung Sĩ
Re: Help me!!!
iaf túc là khi cho biến i chạy thì không cần điều kiện biến i chẵn hay lẻ chứ gì
Luong1993pro- Moderator
Re: Help me!!!
Uh, công nhận cái ava của bác trông lãng mạn quá, hôm nay bác có tâm sự ah?
loptruong- Trung Sĩ
Re: Help me!!!
Nhưng bà hủ xem cái xoá phần tử của bà có ứng dụng giải bài khác không
Luong1993pro- Moderator
Re: Help me!!!
Có chứ tôi thấy trong sách cũng có một số bài mà. Mà sao bác hỏi em lắm thế? Giúp em thì giúp không thì thôi mà cứ vặn vẹo nhiều vậy.
loptruong- Trung Sĩ
Re: Help me!!!
Đức Anh ơi, code có nhầm lẫn gì không vậy? Sao đọc chẳng hiểu gì hết? Cái chỗ For j:=i to n-1 ấy ở trên giá trị của i=n rồi mà.
loptruong- Trung Sĩ
Re: Help me!!!
loptruong đã viết:Đức Anh ơi, code có nhầm lẫn gì không vậy? Sao đọc chẳng hiểu gì hết? Cái chỗ For j:=i to n-1 ấy ở trên giá trị của i=n rồi mà.
Nhìn lại đi bạn ơi, tớ dùng 2 vòng lặp lồng nhau nhá, 1 vòng là i:=n downto 1 , 1 vòng nữa là j:=i to n-1 ( PS: lớp trg tát tớ---> lớp trg là nữ quái )
linhhahaduc- Trung Sĩ
Trang 1 trong tổng số 1 trang
Permissions in this forum:
Bạn không có quyền trả lời bài viết