Tìm kiếm:

là các pờ rồ ấy các dân chơi học giỏi tin hoc ấy

pro đâu cả rồi giúp em đi

bro giúp minh bài mình post lên với

program u_c_l_n;
uses crt;
const fi='ucln.inp';
fo='ucln.out';
var f,g:text;
procedure motep;
begin ,
assign(f,fi);reset(f);
assign(g,fo);rewrite(g);
end;

function của mình chỉ for i tới phần nguyên của căn n nên nó sẽ làm giảm thời gian chạy chương trình, vì ở đây ta chỉ cần tìm thấy 1 i mà n chia hết cho i thì n đó ko phải là số nguyên tố rồi

đề này phải dùng phương pháp đồ thị gì gì đấy.mình đọc đồ thị mà khó hiểu quá nên post lên cho các bác làm xem có dễ hỉu hơn ko

đề cấp tỉnh.mình làm mãi 2 hôm nay rồi

program tanso;
uses crt;
const fi='tanso.inp';
fo='tanso.out';
var f,g:text;
procedure motep;
begin
assign(f,fi);reset(f);
assign(g,fo);rewrite(g);
end;

mình nghĩ cái function ngto nên thế này thì hơn:
function ngto(n:integer):boolean;
var i:integer;
begin
if n<2 then ngto:=false else
if n<4 then ngto:=true else
begin
...

hehe mình copy luôn từ file nên hơi dài. mong bạn giúp đỡ