Tính trung bình cộng các số nguyên chia hết cho 5 trong khoảng từ 5 đến 500
hãy tính trung bình cộng của các số chia hết cho 5 từ 100 đến 9995
rất đơn giản bạn ạ.
Khoảng cách bằng nhau.
TBC là:
\(\frac{100+9995}{2}=5047,5\)
Đ/S:...
viết chương trình nhập n số nguyên từ bàn phím. tính và in ra trung bình cộng các số chia hết cho 5 và 7
Viết phương trình đọc số nguyên N từ bàn phím .Tính và in ra giá trị trung bình cộng của các số chia hết cho 3 và 5
viết chương trình pascal tính trung bình các số chia hết cho 5 nằm trong khoảng từ 1 đến z rồi in ra màn hình với z là số tự nhiên được nhập từ bàn phím và z > 10
Program HOC24;
var z,i,d: integer;
t: real;
begin
write('Nhap z: '); readln(z);
t:=0; d:=0;
for i:=1 to z do if i mod 5=0 then begin t:=t+i; d:=d+1; end;
t:=t/d;
write('Trung binh cong cac so chia het cho 5 trong khoang 1 den ',z,' la: ',t:6:2);
readln
end.
c) Tìm số nguyên nằm trong khoảng từ 500 đến 600, biết số đó chia cho 5, 8, 10 có các số dư
lần lượt là 2, 5, 7.
Gọi số cần tìm là n (n∈N)
Theo đề bài, 500≤n≤600
n:5 dư 2 => n+3⋮5
n:8 dư 5 => n+3⋮8
n:10 dư 7 => n+3⋮10
=>n+3⋮BCNN(5,8,10)=10.8=80
Mà 500≤n≤600 => 503≤n+3≤603 =>n+3=560
Vậy n= 557
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.
a) Tính trung bình cộng các số có 3 chữ số chia hết cho 9.
b) Tính trung bình cộng ..............................chia hết cho 5.
c) Tính ......................................................chia hết cho 3.
Viết chương trình nhập vào mảng A gồm N ( n<=100 )số nguyên. Thực hiện yêu cầu sau. ( 5 điểm ).
a.Tính trung bình cộng các phần tử chia hết cho 3 VÀ 5 trong mảng ( 2 điểm )
b. In ra các phần tử chia hết cho M trong mảng và tính tổng các phần tử chia hết cho M, với M được nhập từ bản phím ( 3 điểm )
Lưu ý: Chương trình chạy được, trình bày tốt về cản lề, xử lý yêu cầu bài toán và in kết quả đúng 1 điểm).
# 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)