Tin học Sửa lỗi viết chương trình

Phan Minh Quân

Học sinh mới
Thành viên
29 Tháng mười một 2019
1
0
1
17
Tiền Giang
THCS Phường 1
[TẶNG BẠN] TRỌN BỘ Bí kíp học tốt 08 môn
Chắc suất Đại học top - Giữ chỗ ngay!!

ĐĂNG BÀI NGAY để cùng trao đổi với các thành viên siêu nhiệt tình & dễ thương trên diễn đàn.

Tại sao khi mình chạy chương trình thì nó lại báo là exitcode = 2 vậy mọi người? Code chi tiết bên dưới:



const
fi_name = 'SUPERPRIME.INP';
fo_name = 'SUPERPRIME.OUT';
var
i,n,demus:LongInt;
fi,fo: text;
begin
assign(fi,fi_name);
reset(fi);
read(fi,n);
close(fi);

assign(fo,fo_name);
rewrite(fo);

while(n>0)do
begin
demus:=0;
for i:=1 to n do if(n mod i =0)then inc(demus);
if(demus<>2)then
begin
write(fo,'NO');
exit;
end;
n:= n div 2;
end;
write(fo,'YES');
close(fo);
end.


Vậy mình sai chỗ não vậy? Mong các cao nhân chỉ giáo ^^Screenshot (49).png Screenshot (50).png Screenshot (51).png
 

Nhật Hạ !

Học sinh chăm học
Thành viên
14 Tháng tư 2019
409
292
76
18
Quảng Nam
THCS Lê Quang Sung
exit code =2 là không tìm thấy file nghĩa là đường dẫn bị sai đó bạn.
file inp bạn ghi rõ đường dẫn ra thử xem sao. vd: D:\abcd\rtert.inp
 

02-07-2019.

Học sinh tiến bộ
HV CLB Lịch sử
Thành viên
4 Tháng năm 2018
1,485
1,656
236
Vĩnh Phúc
Trung học cơ sở Lập Thạch
Tại sao khi mình chạy chương trình thì nó lại báo là exitcode = 2 vậy mọi người? Code chi tiết bên dưới:



const
fi_name = 'SUPERPRIME.INP';
fo_name = 'SUPERPRIME.OUT';
var
i,n,demus:LongInt;
fi,fo: text;
begin
assign(fi,fi_name);
reset(fi);
read(fi,n);
close(fi);

assign(fo,fo_name);
rewrite(fo);

while(n>0)do
begin
demus:=0;
for i:=1 to n do if(n mod i =0)then inc(demus);
if(demus<>2)then
begin
write(fo,'NO');
exit;
end;
n:= n div 2;
end;
write(fo,'YES');
close(fo);
end.


Vậy mình sai chỗ não vậy? Mong các cao nhân chỉ giáo ^^View attachment 138631 View attachment 138633 View attachment 138634
Một là bạn chưa mở file input,output trong phần assign.
Hai là có thể bạn mở rồi nhưng sau khi sửa lại chương trình thì các file ấy không hoạt động nữa! Đóng file (input, output) lại và mở ra!
 

Hải Ham Học

Học sinh
Thành viên
24 Tháng sáu 2017
133
34
26
20
Bà Rịa - Vũng Tàu
thcs hòa hiệp
nhấn F7 và xem cách nó thực hiện các dòng lệnh, F7 mà thấy mes hiện lên là ở chỗ đó xuất hiện lỗ
- Lỗi code exit mà có khỏi tạo file thường rất nhiều thứ phức tạp và do nhiều nguyên nhân, bạn thử lên google là ghi với từ khóa, "lỗi code exit pascal"
 
Top Bottom