viết thuật toán cho bài N! = 1.2.3....N. ( VD 6,trang 58 sgk tin học 8 )
NHANH LÊN GIÚP MÌNH! :((((
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
const
fi='sochinhphuong.inp';
fo='sochinhphuong.out';
var f,g:text;n:longint;
function scp(n:longint):boolean;
begin
if (sqr(trunc(sqrt(n)))=n) then exit (true);
exit (false);
end;
begin
assign(f,fi);reset(f);
assign(g,fo);rewrite(g);
readln(f,n);
if scp(n) then writeln(g,'yes') else
writeln(g,'no');
close(f);close(g);
end.
Tệp tin (file) là tập hợp các thông tin có liên quan với nhau được lưu trữ trên bộ nhỡ ngoài
Thuật toán liệt kê:
Bước 1: Nhập N
Bước 2: T←1; i←1;
Bước 3: Kiếm tra nếu i>n thì in kết quả T và kết thúc
Bước 4: T←T*i;
Bước 5: i←i+1, quay lại bước 3