Originally posted by 11520673
View Post
Announcement
Collapse
No announcement yet.
[PASCAL] Giúp mình một bài toán nhỏ :D
Collapse
X
-
Originally posted by dai6cnt View Postthks các anh chị mà em có thêm nhiều ý tưởng
p/s: bài kiểm tra 15ph bọn em đó
PHP Code:max = 0;
max_i = 0;
for (i = 0; i < n-m; i++){
x = 0;
for (j = i ; j < m; j++)
x = x + a[j];
if (x > max){
max = x;
max_i = i;
}
}
Comment
-
-
Originally posted by 11520673 View Postgõ xong đọc lại mới thấy bài của a này.hay hơn cách e =.="
ah làm cách này vậy mình hình dung ra vầy :
PHP Code:for i:=1 to m do max:=max+a[i];{tìm dãy đầu tiên từ phần tử 1 đem làm max như bạn nói}
for i:=2 to n-m+1 do if (max-a[i-1]+a[i+m-1]) >max then {luu max moi va luu vi tri i dau tien}
Test đi
PHP Code:for i:=1 to m do tempmax:=tempmax + a[i];
max:=tempmax;
max_i:=1;
for i:=1 to n-m do
begin
tempmax:=tempmax - a[i] + a[i+m];
if (tempmax > max) then begin max:=tempmax;max_i:=i + 1;end;
end;
Last edited by 09520019; 24-11-2011, 16:34.Khoảng cách giữa bạn và ước mơ của bạn là bao xa ?
Comment
Comment