Diễn đàn học tập của Hocmai.vn
Liên hệ quảng cáo: xem chi tiết tại đây

Diendan.hocmai.vn - Học thày chẳng tày học bạn! » Ngoại khóa » Tin học - Máy tính » Chương trình tính tổng bình phương các số lẻ




Trả lời
  #1  
Cũ 25-03-2010
g_d g_d đang ngoại tuyến
Thành viên
Thành viên của lớp
 
Tham gia : 16-03-2010
Bài viết: 8
Đã cảm ơn: 2
Được cảm ơn 0 lần
Chương trình tính tổng bình phương các số lẻ

ĐỂ: Nhập vào số n nguyên dương tính tổng bình phương các số lẻ từ 1 đến (2n-1).Mình làm thế này:

Program ChuongTrinhTinhTongBinhPhuong;
Uses crt;
Var s,i,n:integer;
tiep:char;
begin
repeat
clrscr;
writeln(‘=================’);
writeln(‘CT TINH TONG BP’);
writeln(‘=================’);
writeln(‘Nhap n’);
readln(n);
i:=1;
s:=0;
while i<(2*n-1)
do
begin
i:=i+2;
s:=s+i*I;
end;
writeln(‘KQ’,s:10);
writeln(===============’);
writeln(‘Thuc hien nua khong(c/k)?);
readln(tiep);
until upcase(tiep)=’K’;
end.

Mình chạy xong CT này thì thấy có vấn đề(^^).Nhờ mấy bạn sửa giúp.
Trả Lời Với Trích Dẫn
  #2  
Cũ 25-03-2010
hoangtu_faithful's Avatar
hoangtu_faithful hoangtu_faithful đang ngoại tuyến
Romeo
Tổ phó
 
Tham gia : 28-03-2009
Đến từ: Quảng Ninh
Bài viết: 268
Đã cảm ơn: 404
Được cảm ơn 236 lần
Var s,i,n:integer;
tiep:char;
begin
repeat
writeln('=================');
writeln('CT TINH TONG BP');
writeln('=================');
writeln('Nhap n');
readln(n);
i:=1;
s:=0;
while i<(2*n-1)
do
begin
i:=i+2;
s:=s+i*I;
end;
writeln('KQ',s:10);
writeln('===============');
writeln('Thuc hien nua khong(c/k)?');
readln(tiep);
until upcase(tiep)='K';
end.
__________________
(\ _ /) (\ _ /)
(^_^) (^_^)
(") (") (") (")

¨°o.O (ĐIk HuyỀn Khánh TùnG) O.o°
Trả Lời Với Trích Dẫn
  #3  
Cũ 28-03-2010
g_d g_d đang ngoại tuyến
Thành viên
Thành viên của lớp
 
Tham gia : 16-03-2010
Bài viết: 8
Đã cảm ơn: 2
Được cảm ơn 0 lần
Trích:
Nguyên văn bởi hoangtu_faithful Xem Bài viết
Var s,i,n:integer;
tiep:char;
begin
repeat
writeln('=================');
writeln('CT TINH TONG BP');
writeln('=================');
writeln('Nhap n');
readln(n);
i:=1;
s:=0;
while i<(2*n-1)
do
begin
i:=i+2;
s:=s+i*I;
end;
writeln('KQ',s:10);
writeln('===============');
writeln('Thuc hien nua khong(c/k)?');
readln(tiep);
until upcase(tiep)='K';
end.

Mình đâu có bảo chép lại đâu,mình nói chỉ ra cái sai mà.
Trả Lời Với Trích Dẫn
  #4  
Cũ 28-03-2010
mattroitinhyeu_142's Avatar
mattroitinhyeu_142 mattroitinhyeu_142 đang ngoại tuyến
MEM VIP
Lớp phó
 
Tham gia : 11-11-2009
Đến từ: Vũ trụ
Bài viết: 961
Đã cảm ơn: 692
Được cảm ơn 384 lần
ki` ta
Chay chuong trình xong thì/ đê ýL xem cóO lỗi] hay ko
Bộ mất cái chỗ góc màn hình thông báo lỗi hay sao hả
Xem cái đó rồi đọc trong sách xem lỗi bao nhiu mà sửa
__________________
Keep Smiling Together
Trả Lời Với Trích Dẫn
  #5  
Cũ 28-03-2010
marik's Avatar
marik marik đang ngoại tuyến
Thành viên
Thư kí
 
Tham gia : 06-05-2008
Đến từ: Hà Nội
Bài viết: 785
Đã cảm ơn: 5
Được cảm ơn 360 lần
Trích:
Nguyên văn bởi mattroitinhyeu_142 Xem Bài viết
ki` ta
Chay chuong trình xong thì/ đê ýL xem cóO lỗi] hay ko
Bộ mất cái chỗ góc màn hình thông báo lỗi hay sao hả
Xem cái đó rồi đọc trong sách xem lỗi bao nhiu mà sửa
Lỗi thuật toán thì móc đâu ra sửa lỗi hả em, đừng nên nói với người khác kiểu như vậy


@g_d: anh thấy thuật toán ổn đấy chứ nhỉ Không ổn chỗ nào thế?
__________________
Trả Lời Với Trích Dẫn
  #6  
Cũ 29-03-2010
hoangtu_faithful's Avatar
hoangtu_faithful hoangtu_faithful đang ngoại tuyến
Romeo
Tổ phó
 
Tham gia : 28-03-2009
Đến từ: Quảng Ninh
Bài viết: 268
Đã cảm ơn: 404
Được cảm ơn 236 lần
g_d mình chạy thì thấy sai lỗi CT thôi còn sai thuật toán thì cậu thử VD
Mình cũng ko chép nguyên lại co chỉnh sửa ko thì điên gì chép lại
__________________
(\ _ /) (\ _ /)
(^_^) (^_^)
(") (") (") (")

¨°o.O (ĐIk HuyỀn Khánh TùnG) O.o°
Trả Lời Với Trích Dẫn
  #7  
Cũ 30-03-2010
g_d g_d đang ngoại tuyến
Thành viên
Thành viên của lớp
 
Tham gia : 16-03-2010
Bài viết: 8
Đã cảm ơn: 2
Được cảm ơn 0 lần
kì thế,chạy thì nó vẫn ra kết quả ,nhưng mà thấy nó sai sai sao á,mọi người chạy có thấy sai không.Bình phương của:1^2+3^2+5^2=35.Nhưng CT thì ra 37 là sao,với lại đâu có sai lỗi CT đâu.

Thay đổi nội dung bởi: g_d, 30-03-2010 lúc 09:37. Lý do: thiếu ý
Trả Lời Với Trích Dẫn
  #8  
Cũ 31-03-2010
torai112's Avatar
torai112 torai112 đang ngoại tuyến
MEM VIP
Lớp phó
 
Tham gia : 31-07-2007
Đến từ: Đất Tổ quê ta
Bài viết: 995
Đã cảm ơn: 34
Được cảm ơn 129 lần
Trích:
Nguyên văn bởi g_d Xem Bài viết
ĐỂ: Nhập vào số n nguyên dương tính tổng bình phương các số lẻ từ 1 đến (2n-1).Mình làm thế này:

Program ChuongTrinhTinhTongBinhPhuong;
Uses crt;
Var s,i,n:integer;
tiep:char;
begin
repeat
clrscr;
writeln(‘=================’);
writeln(‘CT TINH TONG BP’);
writeln(‘=================’);
writeln(‘Nhap n’);
readln(n);
i:=1;
s:=0;
while i<(2*n-1)
do
begin
i:=i+2;
s:=s+i*I;
end;
writeln(‘KQ’,s:10);
writeln(===============’);
writeln(‘Thuc hien nua khong(c/k)?);
readln(tiep);
until upcase(tiep)=’K’;
end.

Mình chạy xong CT này thì thấy có vấn đề(^^).Nhờ mấy bạn sửa giúp.


Bạn thử sửa thành While i<=(2*n-1) do xem sao nhé !
__________________


Chúng ta sinh ra không phải để yêu một người hoàn hảo mà là để học cách yêu một người không hoàn hảo một cách trọn vẹn !


Hãy cùng tìm hiều thêm về CÔNG NGHỆ THÔNG TIN trong THỜI ĐẠI SỐ của box TIN HỌC
Trả Lời Với Trích Dẫn
Cũ 01-04-2010
ngan000
Tin nhắn đã bị xoá bởi ngan000.
  #9  
Cũ 01-04-2010
g_d g_d đang ngoại tuyến
Thành viên
Thành viên của lớp
 
Tham gia : 16-03-2010
Bài viết: 8
Đã cảm ơn: 2
Được cảm ơn 0 lần
nếu sửa như thế thì lạc đề hay sai rồi bạn.Mình chạy theo cách của bạn rồi đó(^^).CT mình là như thế này:Khi nhập n= 5 thì máy sẽ tính là:1^2+3^2+5^2+7^2+9^2=165 (Ko tính là 1^2+3^2+5^2).Vấn đề là ở chổ đó á.^^!
Trả Lời Với Trích Dẫn
Trả lời

Chia sẻ/đánh dấu bài viết


Ðiều chỉnh Tìm trong bài viết
Tìm trong bài viết:

Tìm chi tiết
Xếp bài

Quyền hạn của bạn
Bạn không thể tạo chủ đề mới
Bạn không thể gửi trả lời
Bạn không thể đăng tập đính kèm
Bạn không thể sửa bài của mình

BB codeMở
Smilies đang Mở
[IMG] đang Mở
HTML đang Tắt

 
Bài giảng mới
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-TB -TB Khá :  Bài 2. Bài giảng (Phần 2)
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-TB -TB Khá : Bài 2. Bài giảng (Phần 2)
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-TB -TB Khá :  Bài 1. Bài giảng (Phần 1)
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-TB -TB Khá : Bài 1. Bài giảng (Phần 1)
Toán 10 - Thầy Lưu Huy Thưởng : Bài 22. Một số bài toán liên quan đến tứ giác (Phần 05)
Toán 10 - Thầy Lưu Huy Thưởng : Bài 22. Một số bài toán liên quan đến tứ giác (Phần 05)
PEN-I: môn Toán - Thầy Lê Anh Tuấn : Bài 3. Bài giảng (Phần 3)
PEN-I: môn Toán - Thầy Lê Anh Tuấn : Bài 3. Bài giảng (Phần 3)
PEN-I: môn Toán - Thầy Lê Anh Tuấn : Bài 2. Bài giảng (Phần 2)
PEN-I: môn Toán - Thầy Lê Anh Tuấn : Bài 2. Bài giảng (Phần 2)
Luyện đề thi vào lớp 6 môn Toán - thầy Trần Hải : Bài 4. Nhận dạng và sắp xếp các bài toán cơ qui luật
Luyện đề thi vào lớp 6 môn Toán - thầy Trần Hải : Bài 4. Nhận dạng và sắp xếp các bài toán cơ qui luật
PEN-I: môn Vật lí - thầy Đỗ Ngọc Hà, thầy Phạm Văn Tùng : Bài 1 Bài giảng (Phần 1)
PEN-I: môn Vật lí - thầy Đỗ Ngọc Hà, thầy Phạm Văn Tùng : Bài 1 Bài giảng (Phần 1)
Luyện đề thi vào lớp 6 môn Toán - thầy Trần Hải : Bài 3: Phương pháp nhận dạng giải nhanh tính tổng dãy số (phần 3)
Luyện đề thi vào lớp 6 môn Toán - thầy Trần Hải : Bài 3: Phương pháp nhận dạng giải nhanh tính tổng dãy số (phần 3)
Luyện đề thi vào lớp 6 môn Toán - thầy Trần Hải :  Bài 1: Phương pháp nhận dạng giải nhanh tính tổng dãy số (phần 1)
Luyện đề thi vào lớp 6 môn Toán - thầy Trần Hải : Bài 1: Phương pháp nhận dạng giải nhanh tính tổng dãy số (phần 1)
Luyện thi quốc gia PEN-C: Môn Toán (Thầy Phan Huy Khải) : Bài 09. Các bái toán về hình vuông
Luyện thi quốc gia PEN-C: Môn Toán (Thầy Phan Huy Khải) : Bài 09. Các bái toán về hình vuông

Đề thi mới
PEN-I: môn Vật lí - thầy Bùi Gia Nội (Khá - Giỏi) 12 : Đề số 3
PEN-I: môn Vật lí - thầy Bùi Gia Nội (Khá - Giỏi) 12 : Đề số 3
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-TB -TB Khá 12 : Đề 01 - 2015
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-TB -TB Khá 12 : Đề 01 - 2015
PEN-I: môn Vật lí - thầy Đỗ Ngọc Hà, thầy Phạm Văn Tùng 12 : Đề số 3
PEN-I: môn Vật lí - thầy Đỗ Ngọc Hà, thầy Phạm Văn Tùng 12 : Đề số 3
Thi thử đại học 12 : Đề thi thử Đại học 2014- 2015
Thi thử đại học 12 : Đề thi thử Đại học 2014- 2015
PEN-I: môn Hoá học - thầy Phạm Ngọc Sơn 12 : Đề số 03
PEN-I: môn Hoá học - thầy Phạm Ngọc Sơn 12 : Đề số 03
PEN-I: môn Sinh học - thầy Nguyễn Thành Công 12 : Đề thi tự luyện số 03
PEN-I: môn Sinh học - thầy Nguyễn Thành Công 12 : Đề thi tự luyện số 03
PEN-I: môn Tiếng Anh - cô Nguyệt Ca 12 : Đề thi tự luyện số 02 (Đề Online)
PEN-I: môn Tiếng Anh - cô Nguyệt Ca 12 : Đề thi tự luyện số 02 (Đề Online)
PEN-I: môn Vật lí - thầy Bùi Gia Nội (TB - TB Khá) 12 : Đề số 4
PEN-I: môn Vật lí - thầy Bùi Gia Nội (TB - TB Khá) 12 : Đề số 4
Thi thử đại học 12 : Đề tự luyện miễn phí
Thi thử đại học 12 : Đề tự luyện miễn phí
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-Khá-Giỏi 12 : Đề thi tự luyện số 01
PEN-I: môn Hoá học - thầy Vũ Khắc Ngọc-Khá-Giỏi 12 : Đề thi tự luyện số 01




Múi giờ GMT +7. Hiện tại là 08:24.
Powered by: vBulletin v3.x.x Copyright ©2000-2014, Jelsoft Enterprises Ltd.

Giấy phép cung cấp dịch vụ mạng xã hội trực tuyến số 196/GXN-TTĐT Cục Quản lý PTTH&TTĐT cấp ngày 11/11/2011.