Bài 1: cho số nguyên N kiểm tra xem N có phải số hoàn hảo không Bài 2: Xây dựng thuật toán cho bài toán tính S=1+3+5+7...+N
2 câu trả lời
bài 2
B1 Nhấp N và dãy số 1 3 5 7 ...N
B2 S <<<1 i<<<1 Tong<<<0 (<<< = gán)
B3 i>(N-1)/2 +1
+ Đúng đưa ra S và kết thúc
+ Sai >>> Tong=Tong+(S+2)
B4 i<<< i+1 quay lại bước 3
Câu 1:
uses crt;
var n,i:longint;
function hh(a:longint):boolean;
var s,i:longint;
begin
hh:=true; s:=0;
for i:=1 to a div 2 do
if a mod i=0 then inc(s,i);
if s<>a then hh:=false;
end;
begin
clrscr;
write('Nhap n: '); readln(n);
if hh(n) then writeln(n,' la so hoan hao')
else writeln(n,' khong phai so hoan hao');
readln
end.
Câu 2:
B1: gán s←0; i←1
B2: đặt điều kiện i<=n mỗi lần lặp inc(s,i); inc(i,2)
B3: nếu i>n thì in kết quả S= ra màn hình
B4: quay lại B2 đến khi thỏa mãn B3