2.2. Viết CT nhập vào hai số nguyên n và a.
a) Tìm trong vùng từ 1 đến n các số chia hết cho a.
b) Cho biết có tất cả bao nhiêu số chia hết a.
c) Tính giá trị trung bình của các số chia hết a.
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.
Những câu hỏi liên quan
NB
14 tháng 4 2023
# Nhập mảng A từ bàn phím
n = int(input("Nhập số lượng phần tử của mảng A: "))
A = []
for i in range(n):
A.append(int(input("Nhập phần tử thứ {} của mảng A: ".format(i+1))))
# Tính trung bình cộng các phần tử chia hết cho 3 và 5
sum_35 = 0
count_35 = 0
for num in A:
if num % 3 == 0 and num % 5 == 0:
sum_35 += num
count_35 += 1
if count_35 > 0:
tb_35 = sum_35 / count_35
print("Trung bình cộng các phần tử chia hết cho 3 và 5 trong mảng A là:", tb_35)
else:
print("Không có phần tử nào chia hết cho cả 3 và 5 trong mảng A")
# In ra các phần tử chia hết cho M và tính tổng các phần tử chia hết cho M
M = int(input("Nhập giá trị M: "))
sum_M = 0
count_M = 0
for num in A:
if num % M == 0:
print(num, end=" ")
sum_M += num
count_M += 1
print("\nTổng các phần tử chia hết cho M trong mảng A là:", sum_M)
4 tháng 3 2021
uses crt;
var a:array[1..100]of integer;
i,n,dem,s,s1,vt:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
dem:=0;
s:=1;
for i:=1 to n do
if a[i]=3 then
begin
inc(dem);
s:=s*a[i];
end;
writeln('So phan tu bang 3 la: ',dem);
writeln('Tich cua chung la: ',s);
for i:=n downto 1 do
if a[i]<0 then
begin
vt:=i;
break;
end;
if vt=0 then writeln('Trong day khong co so am')
else writeln('So am cuoi cung la: ',a[vt]);
s1:=1;
for i:=1 to n do
if (a[i] mod 3=0) or (a[i] mod 4=0) then s1:=s1*a[i];
writeln('Tich cac phan tu chia het cho 3 hoac 4 la: ',s1);
writeln('Cac so nguyen la: ');
for i:=1 to n do
write(a[i]:4);
readln;
end.
LH
7 tháng 3 2023
uses crt;
var i,n,d:longint;
begin
d:=0;
writeln('nhapn=');read(n);
for i:=1 to n do
begin
if i mod 3=0 then write(i,' ');
if i mod 3=0 then d:=d+i;
end;
writeln('tong=',d);
readln;
end;
25 tháng 12 2020
uses crt;
var i,n,dem:integer;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n>0;
writeln('Cac so chan va chia het cho 4 trong khoang tu 5 toi ',n,' la: ');
for i:=5 to n do
if (i mod 2=0) and (i mod 7=0) then write(i:4);
writeln;
writeln('Cac so chia het cho 7 trong khoang tu 5 toi ',n,' la: ');
dem:=0;
for i:=5 to n do
if i mod 7=0 then
begin
write(i:4);
inc(dem);
end;
writeln;
writeln('Co ',dem,' so chia het cho 7 trong khoang tu 5 toi ',n);
readln;
end.
GB
26 tháng 3 2023
n = int(input("Nhập n: "))
a = [ ]
for i in range(n):
a.append(int(input(f"Nhập phần tử a[{i}]: ")))
k = int(input("Nhập k: "))
count_greater = 0
count_divisible_by_three = 0
for num in a:
if num > k:
count_greater += 1
if sum(int(digit) for digit in str(num)) % 3 == 0:
count_divisible_by_three += 1
print(f"Số lớn hơn {k}: {count_greater} số")
print(f"Số có tổng các chữ số chia hết cho 3: {count_divisible_by_three} số")
7 tháng 3 2021
uses crt;
var n,i,t:integer;
begin
clrscr;
write('Nhap n='); readln(n);
t:=0;
for i:=1 to n do
if i mod 3=0 then
begin
write(i:4);
t:=t+i;
end;
writeln;
writeln('Tong cac so chia het cho 3 la: ',t);
readln;
end.
Câu 2:
#include <bits/stdc++.h>
using namespace std;
signed main()
{
long long n, a;
cin>>n>>a;
long long dem=0;
for(int i=1; i<=n; i++)
{
if(i%a==0) dem++;
}
cout<<dem;
}
Câu 1:
#include <bits/stdc++.h>
using namespace std;
signed main()
{
long long n, a;
cin>>n>>a;
long long dem=0;
for(int i=1; i<=n; i++)
{
if(i%a==0) cout<<i<<' ';
}
}