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.
def is_coprime(a, b):
"""Hàm ktra a và b có phải là nguyên tố cùng nhau"""
while b:
a, b = b, a % b
return a == 1
n = int(input("Nhập stn n: "))
count = 0
for i in range(1, n+1):
if is_coprime(i, n):
count += 1
print(f"Số lượng số nguyên tố cùng nhau với n là {count}.")
Bài 1:
uses crt;
var n,t1,t2,t3,i:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t1:=0;
t2:=0;
for i:=1 to n-1 do
begin
if i mod 2=1 then t1:=t1+i
else t2:=t2+i;
end;
writeln('Tong cac so le nho hon ',n,' la: ',t1);
writeln('Tong cac so chan nho hon ',n,' la: ',t2);
t3:=0;
for i:=1 to 2*n do
t3:=t3+i;
writeln('Tong cac so trong day so tu 1 toi 2*',n,' la: ',t3);
readln;
end.
Cau 1:
var i,dem:integer;
function ngto(n:longint):boolean;
var bo:boolean;
i:longint;
begin
bo:=true;
for i:=2 to n-1 do
if n mod i=0 then bo:=false;
if n>1 then ngto:=bo else ngto:=false;
end;
begin
for i:=2 to 100 do
if ngto(i) then dem:=dem+i;
write(dem);
readln;
end.
Cau 2:
var i,dem,n:longint;
begin
read(n);
dem:=1;
for i:=1 to n do
dem:=dem*i;
write(dem);
readln;
end.
uses crt;
var n,i,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=1 to n do
if i mod 7=0 then inc(dem);
write(dem);
readln;
end.
Ta cần khai báo biến n kiểu int là phần tử cuối cùng trong biểu thức và biến p = 1 để tính tích của biểu thức (nếu p = 0 thì biểu thức luôn luôn = 0).
Sử dụng vòng lặp do..while với điều kiện n >= 1, nếu n < 1 thì yêu cầu nhập lại n.
Để tính tích của biểu thức ta có thể sử dụng một trong hai vòng lặp là while và for.
Bài viết này được đăng tại [free tuts .net]
Hoặc
Sau khi tính xong ta được tích của biểu thức là p, khi đó chỉ cần in p ra màn hình.
Code:
n = int(input('Nhập số tự nhiên n: '))
T = 1
for i in range(1,n+1):
T *= i
print('Tích các số từ 1 đến',n,'là:',T)