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.
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.
# Dãy số thứ nhất
list1 = list(map(int, input("Nhập dãy số thứ nhất, cách nhau bằng khoảng trắng: ").split()))
so_chan1 = 0
so_le1 = 0
for num in list1:
if num % 2 == 0:
so_chan1 += 1
else:
so_le1 += 1
print("Trong dãy số thứ nhất có", so_chan1, "số chẵn và", so_le1, "số lẻ.")
# Dãy số thứ hai
list2 = list(map(int, input("Nhập dãy số thứ hai, cách nhau bằng khoảng trắng: ").split()))
so_chan2 = 0
so_le2 = 0
for num in list2:
if num % 2 == 0:
so_chan2 += 1
else:
so_le2 += 1
print("Trong dãy số thứ hai có", so_chan2, "số chẵn và", so_le2, "số lẻ.")
Input: số nguyên N
Output: N là chẵn hoặc N là lẻ
- Thuật toán liệt kê:
+ Bước 1: Nhập N
+ Bước 2: Nếu N chia hết cho 2 thì in ra N chẵn và kết thúc thuật toán ngược lại nếu N không chia hết cho 2 thì in ra N lẻ và kết thúc thuật toán
- Thuật toán sơ đồ khối:
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.
#include <bits/stdc++.h>
using namespace std;
long long n,i,t;
int main()
{
cin>>n;
t=0;
for (i=1; i<=n; i++)
if (i%3==0) t=t+i;
cout<<t;
return 0;
}
n = int(input('Nhập số n: '))
sum = 0
i = 1
while i <= n:
if i % 2 == 0:
sum += i
print(i, end=' ')
i += 1
print()
print('Tổng các số chẵn từ 1 đến n là:', sum)
n = int(input('Nhập số n: '))
sum = 0
i = 1
while i <= n:
if i % 2 == 0:
sum += i
print(i, end=' ')
i += 1
print()
print('Tổng các số chẵn từ 1 đến n là:', sum)
n = int(input("Nhập vào số tự nhiên n: "))
count = 0
for i in range(2, n+1):
if i % 3 == 0:
count += 1
print("Số lượng số chẵn chia hết cho 3 trong đoạn từ 2 đến n là:", count)