Lập trình đơn giản

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
•๖ۣۜNHa•

Program sdfsadfd;
uses crt;
Var n,i,D,C,k,j,m:longint;
a,b:array[0..10005]of longint;
BEGIN
Read(n);
For i:=1 to n do begin
Read(a[i]);
a[i]:=a[j-1]+a[i];
end;
Read(m);
For i:=1 to m do begin
Read(b[i]);
D:=1; C:=n;
WHile D<C do begin
k:=(D+C) div 2;
If a[k]<b[i] then D:=K+1
else C:=K;
end;
WRite(D,' ');
end;
END.

Viết xong code, chương trình chạy bình thường! nhưng nhập được 1/2 thì exit code 201! Vậy cần sửa chổ nào ạ?

 

Nguyễn Lê Phước Thịnh
19 tháng 12 2021 lúc 23:03

Bạn sửa chỗ integer thành real nhé


Các câu hỏi tương tự
Nguyễn Phúc Gia Bảo
Xem chi tiết
Nguyễn Minh Lệ
Xem chi tiết
nguyen ngoc minh chau
Xem chi tiết
thủy Trần
Xem chi tiết
Hương Nguyễn
Xem chi tiết
Minh Lệ
Xem chi tiết
Coby Cotton
Xem chi tiết
Hồ Sĩ Long
Xem chi tiết
Đào Duy Quỳnh
Xem chi tiết