K
Khách

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.

13 tháng 2 2023

# Nhập số tiền

A = int(input('Nhập số tiền A đồng: '))

# Tính tổng lãi và gốc sau 24 tháng

monthly_interest = 0.01

total_interest = 0

total_principal = 0

for i in range(1, 25):

        interest = A * monthly_interest

         total_interest += interest

         total_principal += A

         A += interest

print('Tổng lãi sau 24 tháng:', total_interest)

print('Tổng gốc sau 24 tháng:', total_principal)

23 tháng 3 2023

Program HOC24;

var i,n: integer;

begin

write('Nhap N: '); readln(n);

for i:=50 to n do if i mod 2=1 then write(i,' ');

readln

end.

26 tháng 4 2023

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}.")

12 tháng 3 2023

Program HOC24;

var i,t,k,n: integer;

begin

write('Nhap N: '); readln(n);

t:=0; k=0;

while k=0 do

begin

n:=n+1;

for i:=1 to n do if n mod i=0 then t:=t+i;

if t=n then

begin

write(n);

k:=k+1

end else t:=0;

end;

readln

end.

13 tháng 3 2023

Giải cho em bằng chương trình python lớp 10 đc ko ạ

31 tháng 12 2022

uses crt;

var n,i,t:integer;

begin

clrscr;

readln(n);

t:=0;

for i:=1 to n-1 do

if i mod 2=0 then

begin

write(i:4);

t:=t+i;

end;

writeln;

writeln(t);

readln;

end.

14 tháng 3 2023

n = int(input())
s = 0
for i in range(1, n):
    if i % 2 == 0:
        print(i)
        s += i
print(s)

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.