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

Đặng Kiên

Viết chương trình đọc tệp từ file input.inp kiểm tra xem số đó có phải số nguyên tố hay không và ghi kết quả vào file output.out.

giúp mình với. thanks

Nguyễn Lê Phước Thịnh
15 tháng 6 2020 lúc 13:04

const fi='input.inp';

fo='output.out';

var f1,f2:text;

n,i,kt:integer;

begin

assign(f1,fi); reset(f1);

assign(f2,fo); rewrite(f2);

readln(f1,n);

kt:=0;

for i:=2 to n-1 do

if n mod i=0 then kt:=1;

if kt=0 then writeln(f2,'co')

else writeln(f2,'khong');

close(f1);

close(f2);

end.

Vũ Thị Hà Trang
15 tháng 6 2020 lúc 20:51
uses crt; var n:longint;function nt(n:longint):boolean; var i:longint; beginnt:=false; if n<2 then exit; for i:=2 to n div 2 do if n mod i=0 then exit;nt:=true;end; begin writeln('nhap n=');readln(n);if nt(n) then write('yes') else write('no');readlnend.

Các câu hỏi tương tự
hung nguyen
Xem chi tiết
Kamato Heiji
Xem chi tiết
Thị Ngọc Phan
Xem chi tiết
misha
Xem chi tiết
Thiện
Xem chi tiết
Quỳnh Chi Nguyễn
Xem chi tiết
Bét Đe
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết
dinhnguyentuhuy
Xem chi tiết