Similar topics
Latest topics
Statistics
Diễn Đàn hiện có 63 thành viênChúng ta cùng chào mừng thành viên mới đăng ký: cubincoi
Tổng số bài viết đã gửi vào diễn đàn là 266 in 88 subjects
Code tham khao bai 2 de mau
+6
ionlangle
windy boy
curi_1602
huynhtripham
taleanhdao
dumikiller
10 posters
Trang 1 trong tổng số 1 trang
Code tham khao bai 2 de mau
program thuat_toan;
uses crt;
var n,x,i,t,p,g: integer;
y : real;
a,b : array[1..100] of integer;
begin
clrscr;
write('Nhap n: ');readln(n);
write('Nhap x: ');readln(x);
for i:=1 to n do
begin
write('a(',i,')= ');readln(a[i]);
write('b(',i,')= ');readln(b[i]);
end;
g:=round((1+n)/2);
if (a[1]<=x) and (x<=a[2]) then i:=1 else
if (a[n-1]<=x) and (x<=a[n]) then i:=n-1 else
if (a[g]<=x) and (x<=a[g+1]) then i:=g else
begin
t:=1; p:=n;
while (x<a[g]) or (a[g+1]<x) do
begin
if x<a[g] then p:=g else
if a[g+1]<x then t:=g;
g:=round((t+p)/2);
i:=g;
end;
end;
y:=(x-a[i])*(a[i]-a[i+1])/(b[i]-b[i+1])+b[i];
writeln;
writeln('Gia tri i : ',i);
writeln('Khoang chua x : [',a[i],';',a[i+1],']');
writeln('Gia tri y tuong ung: ',y:0:2);readln;
end.
uses crt;
var n,x,i,t,p,g: integer;
y : real;
a,b : array[1..100] of integer;
begin
clrscr;
write('Nhap n: ');readln(n);
write('Nhap x: ');readln(x);
for i:=1 to n do
begin
write('a(',i,')= ');readln(a[i]);
write('b(',i,')= ');readln(b[i]);
end;
g:=round((1+n)/2);
if (a[1]<=x) and (x<=a[2]) then i:=1 else
if (a[n-1]<=x) and (x<=a[n]) then i:=n-1 else
if (a[g]<=x) and (x<=a[g+1]) then i:=g else
begin
t:=1; p:=n;
while (x<a[g]) or (a[g+1]<x) do
begin
if x<a[g] then p:=g else
if a[g+1]<x then t:=g;
g:=round((t+p)/2);
i:=g;
end;
end;
y:=(x-a[i])*(a[i]-a[i+1])/(b[i]-b[i+1])+b[i];
writeln;
writeln('Gia tri i : ',i);
writeln('Khoang chua x : [',a[i],';',a[i+1],']');
writeln('Gia tri y tuong ung: ',y:0:2);readln;
end.
dumikiller- Tổng số bài gửi : 2
Points : 4
Join date : 23/01/2010
Re: Code tham khao bai 2 de mau
Khi nãy mình viết = C báo lỗi loạn cả lên.
Thanks Dumi
Thanks Dumi
taleanhdao- Tổng số bài gửi : 18
Points : 41
Join date : 03/01/2010
Re: Code tham khao bai 2 de mau
đề bài iu cầu vik thuật toán thôi mà, đâu cần vik code của chương trình đâu?
huynhtripham- Tổng số bài gửi : 10
Points : 12
Join date : 10/01/2010
Age : 33
Đến từ : Ho Chi Minh Ville
Re: Code tham khao bai 2 de mau
code này của pascal mà, đâu phải C đâu?
curi_1602- Tổng số bài gửi : 3
Points : 3
Join date : 25/01/2010
Re: Code tham khao bai 2 de mau
bác nào có tài liệu ôn tập gửi cho em giúp... herr herr, thèng penguin đâu ùi....
windy boy- Tổng số bài gửi : 15
Points : 19
Join date : 28/01/2010
Re: Code tham khao bai 2 de mau
Sau đây là bài giải của tớ, tớ viết bằng C++, thuật toán khác với của Minh. Tớ chỉ viết phần tìm a[i] và a[i+1] thôi. Phần tìm giá trị y tương ứng các bạn tự viết thêm nhé.
Code đây:
#include <stdio.h>
#include <conio.h>
// this program is written by ionlangle - Hoang Vu Xuan Khoa
void main (void)
{
int a[100],b[100],x,n,i,trai,phai,giua;
printf("Nhap gia tri cua x: ");
scanf("%d",&x);
printf("Nhap gia tri cua n: ");
scanf("%d",&n);
for (i=0;i<n;i++)
{
printf("Nhap a[%d]: ",i+1);
scanf("%d",&a[i]);
}
if ((x<a[0])|(x>a[n-1]))
printf("Gia tri cua x khong hop le");
else
{
trai=0;
phai=n-1;
giua=trai;
while ((phai-trai)>1)
{
if ((a[giua]>x)&(a[trai]<x))
phai=giua;
else
trai=giua;
giua=(phai-trai)/2+trai;
}
printf("Khoang can tim ung voi a[%d] và a[%d] \n",trai+1,phai+1);
}
getch();
}
Code đây:
#include <stdio.h>
#include <conio.h>
// this program is written by ionlangle - Hoang Vu Xuan Khoa
void main (void)
{
int a[100],b[100],x,n,i,trai,phai,giua;
printf("Nhap gia tri cua x: ");
scanf("%d",&x);
printf("Nhap gia tri cua n: ");
scanf("%d",&n);
for (i=0;i<n;i++)
{
printf("Nhap a[%d]: ",i+1);
scanf("%d",&a[i]);
}
if ((x<a[0])|(x>a[n-1]))
printf("Gia tri cua x khong hop le");
else
{
trai=0;
phai=n-1;
giua=trai;
while ((phai-trai)>1)
{
if ((a[giua]>x)&(a[trai]<x))
phai=giua;
else
trai=giua;
giua=(phai-trai)/2+trai;
}
printf("Khoang can tim ung voi a[%d] và a[%d] \n",trai+1,phai+1);
}
getch();
}
ionlangle- Admin
- Tổng số bài gửi : 68
Points : 118
Join date : 03/01/2010
Age : 33
Re: Code tham khao bai 2 de mau
sao ban dau goi giua=trai roi trong cai else co cai trai=giua.....kho hieu qua....help me
hieeus_chopper- Tổng số bài gửi : 1
Points : 1
Join date : 01/02/2010
Re: Code tham khao bai 2 de mau
trong C, trường số integer, phép chia 1/2=0 ha ha
ionlangle- Admin
- Tổng số bài gửi : 68
Points : 118
Join date : 03/01/2010
Age : 33
Re: Code tham khao bai 2 de mau
Thế có bạn nào pro vào tổng kết lại cái. Càng đơn giản càng tốt nhé
Green- Tổng số bài gửi : 22
Points : 34
Join date : 26/01/2010
Re: Code tham khao bai 2 de mau
Green đã viết:Thế có bạn nào pro vào tổng kết lại cái. Càng đơn giản càng tốt nhé
Học thuộc lòng 1 trong 2 bài giải đi nha
Lập trình viên chuyên nghiệp người ta cũng sử dụng 1 số module có sẵn để làm việc cho nhanh mà
SWaggA- Tổng số bài gửi : 9
Points : 12
Join date : 23/01/2010
Re: Code tham khao bai 2 de mau
hey đề bài kêu vik thuật toán chứ có phải chương trình đâu, anh em xem kĩ lại đi!!!
huynhtripham- Tổng số bài gửi : 10
Points : 12
Join date : 10/01/2010
Age : 33
Đến từ : Ho Chi Minh Ville
Re: Code tham khao bai 2 de mau
huynhtripham đã viết:hey đề bài kêu vik thuật toán chứ có phải chương trình đâu, anh em xem kĩ lại đi!!!
lỡ đại ca Linh đổi đề thì sao pa
SWaggA- Tổng số bài gửi : 9
Points : 12
Join date : 23/01/2010
Re: Code tham khao bai 2 de mau
thuật toán dùng mã giả còn được, huống chi mã thiệt
dumikiller- Tổng số bài gửi : 2
Points : 4
Join date : 23/01/2010
Re: Code tham khao bai 2 de mau
Xin cáo lỗi cùng các bạn, code của mình có một lỗi nhỏ; mình sửa lại và in đậm cùng với gạch dưới.
...
if ((x<a[0])|(x>a[n-1]))
printf("Gia tri cua x khong hop le");
else
{
trai=0;
phai=n-1;
giua=phai;
while ((phai-trai)>1)
{
if ((a[giua]>x)&(a[trai]<x))
phai=giua;
else
trai=giua;
giua=(phai-trai)/2+trai;
}
printf("Khoang can tim ung voi a[%d] và a[%d] \n",trai+1,phai+1);
}
....
cũng có thể viết gọn hơn như sau (cái này là ý tưởng của bạn Đặng Quang Minh):
...
if ((x<a[0])|(x>a[n-1]))
printf("Gia tri cua x khong hop le");
else
{
trai=0;
phai=n-1;
giua=phai;
while ((phai-trai)>1)
{
if (a[giua]>x)
phai=giua;
else
trai=giua;
giua=(phai-trai)/2+trai;
}
printf("Khoang can tim ung voi a[%d] và a[%d] \n",trai+1,phai+1);
}
...
...
if ((x<a[0])|(x>a[n-1]))
printf("Gia tri cua x khong hop le");
else
{
trai=0;
phai=n-1;
giua=phai;
while ((phai-trai)>1)
{
if ((a[giua]>x)&(a[trai]<x))
phai=giua;
else
trai=giua;
giua=(phai-trai)/2+trai;
}
printf("Khoang can tim ung voi a[%d] và a[%d] \n",trai+1,phai+1);
}
....
cũng có thể viết gọn hơn như sau (cái này là ý tưởng của bạn Đặng Quang Minh):
...
if ((x<a[0])|(x>a[n-1]))
printf("Gia tri cua x khong hop le");
else
{
trai=0;
phai=n-1;
giua=phai;
while ((phai-trai)>1)
{
if (a[giua]>x)
phai=giua;
else
trai=giua;
giua=(phai-trai)/2+trai;
}
printf("Khoang can tim ung voi a[%d] và a[%d] \n",trai+1,phai+1);
}
...
ionlangle- Admin
- Tổng số bài gửi : 68
Points : 118
Join date : 03/01/2010
Age : 33
Re: Code tham khao bai 2 de mau
Nghĩ thuật toán thì dc!hey đề bài kêu vik thuật toán chứ có phải chương trình đâu, anh em xem kĩ lại đi!!
Còn viết bằng code thì em chưa đủ đẳng!
Canthach Kimi Arne- Tổng số bài gửi : 17
Points : 25
Join date : 10/01/2010
Age : 33
Đến từ : Đồng Nai
Re: Code tham khao bai 2 de mau
e Khoa, ong hieu sai y cua tui roi, ko phai vay dau. bay h up len thi chang coi kip nua, danh thoi vay
curi_1602- Tổng số bài gửi : 3
Points : 3
Join date : 25/01/2010
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
Fri Aug 10, 2012 10:41 am by cubincoi
» Khai giảng lớp luyện thi N2 và N3 tại Trung tâm Nhật Ngữ Top Globis
Tue Feb 14, 2012 3:35 pm by tuquynh
» Học tiếng Nhật - Top Globis
Thu Sep 22, 2011 2:53 pm by tuquynh
» Học tiếng Nhật - Top Globis
Tue Aug 16, 2011 10:19 am by tuquynh
» Tiếng Nhật online xu thế mới của thời đại- Top Globis
Thu Jun 23, 2011 4:32 pm by tuquynh
» Khai giảng lớp đàm thoại sơ trung cấp tại Top Globis
Thu Jun 23, 2011 4:31 pm by tuquynh
» cùng nhau tâm sự về bài thơ Tản Đà
Mon Jan 17, 2011 9:30 am by gianggiangonline
» Thông báo cuối kì
Sat Jan 15, 2011 4:24 pm by SWaggA
» CLB ở IDECAF
Sat Nov 27, 2010 10:45 am by ionlangle
» Tài liệu dãy hàm
Mon Nov 22, 2010 3:12 pm by medusa6868
» lớp tập huấn kỹ năng
Fri Nov 12, 2010 7:24 pm by SnowDuck
» Sinh viên 5 tốt
Tue Nov 09, 2010 10:58 am by ionlangle
» Nội dung thi giữa kì môn Mác Lê
Thu Nov 04, 2010 10:20 pm by SWaggA
» Tài liệu môn Mác - Lênin
Thu Nov 04, 2010 10:19 pm by SWaggA
» Học phụ đạo môn Lý 2
Thu Nov 04, 2010 7:19 pm by SnowDuck