Tra cứu thuật ngữ tin học viết tắt
Chia sẻ bởi Cao Trung |
Ngày 14/10/2018 |
31
Chia sẻ tài liệu: Tra cứu thuật ngữ tin học viết tắt thuộc Tư liệu tham khảo
Nội dung tài liệu:
Phân tích ra thừa số nguyên tố:
program nguyento;
var i,n:integer;
BEGIN
write(`n:=`); readln(n);
Write(n,`=`);
while n>1 do
begin
i:=2;
while (n mod i) <>0 do
inc(i);
Write(i);
n:= n div i;
if n>1 then
write(`*`);
end;
readln;
END.
program nguyento;
var i,n:integer;
BEGIN
write(`n:=`); readln(n);
Write(n,`=`);
while n>1 do
begin
i:=2;
while (n mod i) <>0 do
inc(i);
Write(i);
n:= n div i;
if n>1 then
write(`*`);
end;
readln;
END.
* Một số tài liệu cũ có thể bị lỗi font khi hiển thị do dùng bộ mã không phải Unikey ...
Người chia sẻ: Cao Trung
Dung lượng: 19,50KB|
Lượt tài: 0
Loại file: doc
Nguồn : Chưa rõ
(Tài liệu chưa được thẩm định)