Mọi người giúp dùm em!!^^
4 posters
Trang 1 trong tổng số 1 trang
Mọi người giúp dùm em!!^^
Tìm kiếm nhị phân.Dãy A là dãy tăng gồm N(N<=250)số nguyên dương A1,A2,....AN và số nguyên k.In ra chỉ số i mà Ai=k hoặc thông báo ''khong tim thay''nếu không có số hạng nào của dãy A có giá trị = k.
hieu336- Thành viên mới
- Ngày sinh : 14/03/1994
Tuổi : 30
Ngày đăng ký : 25/02/2011
Re: Mọi người giúp dùm em!!^^
bai nay sach giao khoa lop 11 co.lay ma doc'kho gi dau
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
Re: Mọi người giúp dùm em!!^^
var n,i,k,cs:byte;
a:array[1..255] of integer;
begin
readln(n);
for i:=1 to n do readln(a[i]);
readln(k);
for i:=1 to n do
if a[i]=k then cs:=i;
if cs>0 then write(cs)
else write('ko tim thay');
readln
end.
a:array[1..255] of integer;
begin
readln(n);
for i:=1 to n do readln(a[i]);
readln(k);
for i:=1 to n do
if a[i]=k then cs:=i;
if cs>0 then write(cs)
else write('ko tim thay');
readln
end.
nbni- Thành viên mới
- Ngày sinh : 12/08/1995
Tuổi : 28
Ngày đăng ký : 18/02/2011
Re: Mọi người giúp dùm em!!^^
nbni nay.minh nghi ban chua hieu the nao la tim kiem nhi phan.lam vay khong dung ban chat bai toan dau.va ban con thieu buoc viet ra thong bao de nhap so lieu vao.lan sau co gang hon nhe.
Được sửa bởi tieuquaitu ngày 8/3/2011, 10:24 pm; sửa lần 1.
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
Re: Mọi người giúp dùm em!!^^
phai the nay ne:
var a:array[1..200] of integer;
n,d,g,c,i,m:byte;
ok:boolean;
begin
write('nhap so luong phan tu:');
readln(n);
for i:-1 to n do
begin
write('nhap so thu:',i);
readln(a[i]);
end;
write('nhap so can tim:');
d:=1;
c:=n;
ok:=false;
while (d<=c) and (ok=false) do
begin
g:=(d+c) div 2;
if a[g]=m then ok:=true
else
if a[g]>m then c:=g-1
else
d:=g+1;
end;
if ok=true then writeln(''vi tri:',g)
else
writeln('chiu,tim khong thay.');
readln
end.
var a:array[1..200] of integer;
n,d,g,c,i,m:byte;
ok:boolean;
begin
write('nhap so luong phan tu:');
readln(n);
for i:-1 to n do
begin
write('nhap so thu:',i);
readln(a[i]);
end;
write('nhap so can tim:');
d:=1;
c:=n;
ok:=false;
while (d<=c) and (ok=false) do
begin
g:=(d+c) div 2;
if a[g]=m then ok:=true
else
if a[g]>m then c:=g-1
else
d:=g+1;
end;
if ok=true then writeln(''vi tri:',g)
else
writeln('chiu,tim khong thay.');
readln
end.
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
ok
nhin tuong dai nhung may se thuc hien it phep toan hon day.cach nay dac biet co hieu qua khi mang co rat nieu so.
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
Re: Mọi người giúp dùm em!!^^
mình nghĩ ko cần viết wa chi tiết vì ko viết thì chủ topic cũng bjt mà thêm vào,đâu phải là một cuộc thi đâu mà phải quá chi tiếc,vơí lại bài cuả bạn còn thiếu đó bổ sung vào đi bạn...tieuquaitu đã viết:va ban con thieu buoc viet ra thong bao de nhap so lieu vao.lan sau co gang hon nhe.
nbni- Thành viên mới
- Ngày sinh : 12/08/1995
Tuổi : 28
Ngày đăng ký : 18/02/2011
Re: Mọi người giúp dùm em!!^^
thieu o dau
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
Re: Mọi người giúp dùm em!!^^
tieuquaitu đã viết:
write('nhap so can tim:');
nbni- Thành viên mới
- Ngày sinh : 12/08/1995
Tuổi : 28
Ngày đăng ký : 18/02/2011
Re: Mọi người giúp dùm em!!^^
co the ma cung noi.kem mieng kho chiu a?noi ro ra xem thieu o dau?anh noi that:em sinh nam 95 ma trinh do nhu the la rat kha nhung con phai hoc nhieu.
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
Re: Mọi người giúp dùm em!!^^
em mơí học pascal có 3 tuần thôi
nbni- Thành viên mới
- Ngày sinh : 12/08/1995
Tuổi : 28
Ngày đăng ký : 18/02/2011
Re: Mọi người giúp dùm em!!^^
3 tuan.bang anh hoc nua hoc ky day.hoi moi hoc anh cung kem lam
tieuquaitu- Thành viên thường
- Ngày sinh : 08/07/1993
Tuổi : 30
Ngày đăng ký : 09/02/2011
nbni- Thành viên mới
- Ngày sinh : 12/08/1995
Tuổi : 28
Ngày đăng ký : 18/02/2011
Re: Mọi người giúp dùm em!!^^
Giai gap dum em nhoa
Trong kỳ thi tốt nghiệp THCS, mỗi phòng thi đều có 24 thí sinh được xếp vào 6 dãy bàn, mỗi dãy có 4 thí sinh. Có 24 tờ giấy nháp với ba loại màu Xanh, Đỏ, Tím sẽ được phát cho 24 thí sinh trong phòng thi.
Hãy viết chương trình giúp cho Giám thị phát giấy nháp sao cho mỗi thí sinh sử dụng một màu giấy nháp không trùng với màu của các bạn ngồi ở vị trí trước, sau, trái, phải đối với thí sinh đó.
1) Yêu cầu: in ra màn hình tất cả sơ đồ phát giấy nháp có thể được.
2) Tổng số giấy nháp mỗi loại được sử dụng.
Trong kỳ thi tốt nghiệp THCS, mỗi phòng thi đều có 24 thí sinh được xếp vào 6 dãy bàn, mỗi dãy có 4 thí sinh. Có 24 tờ giấy nháp với ba loại màu Xanh, Đỏ, Tím sẽ được phát cho 24 thí sinh trong phòng thi.
Hãy viết chương trình giúp cho Giám thị phát giấy nháp sao cho mỗi thí sinh sử dụng một màu giấy nháp không trùng với màu của các bạn ngồi ở vị trí trước, sau, trái, phải đối với thí sinh đó.
1) Yêu cầu: in ra màn hình tất cả sơ đồ phát giấy nháp có thể được.
2) Tổng số giấy nháp mỗi loại được sử dụng.
trangbui_thcstanhiep- Thành viên mới
- Ngày sinh : 01/04/1996
Tuổi : 27
Ngày đăng ký : 20/03/2011
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
|
|
15/4/2011, 10:34 pm by funny
» Mọi người làm giúp tôi bài này với !
13/4/2011, 11:42 am by phonggia
» Giúp mình giải bài này với
12/4/2011, 1:00 pm by ldt
» Chia se 1 bai paccal ve ve do thi
11/4/2011, 1:55 pm by duy_sau_rom
» đồ hoạ trong pascal
9/4/2011, 9:16 pm by jetlongk4
» Giá trị biểu thức bằng kí pháp nghịch đảo
1/4/2011, 8:49 am by kh1132000
» AI GIẢI GIÚP EM BÀI NÀY VỚi , ĐANG CẦN GẤP GẤP LẮM :(
31/3/2011, 11:47 pm by jancancook
» dòng thời gian
31/3/2011, 11:31 am by gianggiangonline
» anh nào giúp em với
30/3/2011, 11:00 pm by sieuhoatinh
» VTC trả lương 10 triệu cho SV tốt nghiệp ĐH Văn Hiến - khoa CNTT - ĐTVT tại Hà Nội
29/3/2011, 2:48 pm by SV_tuonglai
» Download cẩm nang mùa thi 2011 tại đây
29/3/2011, 2:47 pm by SV_tuonglai
» Check giúp mình lỗi trong code này với !
27/3/2011, 10:07 pm by mamap0511
» Tai nghe sony dr 370 ve hang moi
25/3/2011, 8:42 pm by hs_bin
» giúp em với
25/3/2011, 12:11 pm by nbni
» Headphone sony dr 370 moi ve hang
24/3/2011, 9:13 pm by hs_bin
» GIUP EM MAY BAI PASCAL CO BAN ( EM MOI HOC PASCAL)
24/3/2011, 9:11 pm by tuan045610
» Headphone sony DR 370 moi ve hang
21/3/2011, 8:11 pm by hs_bin
» Sony DR 310 moi ve hang
20/3/2011, 9:34 pm by hs_bin
» Mọi người giúp dùm em!!^^
20/3/2011, 9:53 am by trangbui_thcstanhiep
» bài tập về hàm trog pascal
18/3/2011, 10:34 pm by sieuhoatinh