Viết chương trình tính trung bình của N số thực x1,x2,x3,....xn. Các số N và x1,x2,x3....xn được nhập từ bàn phím ( Sử dụng While....do)
Giúp mình với nhé❤️🍀
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.
6 tháng 4 2023
# 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ẻ.")
6 tháng 4 2023
count = 0
for i in range(10, 2001):
if i % 3 == 0 and i % 9 == 0 and i % 11 == 0:
count += 1
print(count)
R
2
ML
5 tháng 4 2023
While..do
Program HOC24;
var i: integer;
s: longint;
begin
s:=0; i:=1;
while i<=2018 do
begin
s:=s+i;
i:=i+1;
end;
write('S = ',s);
readln
end.
5 tháng 4 2023
program Dem_Chia_Het;
var s, i: longint;
begin
s := 0;
for i := 10 to 2000 do
begin
if i mod 297 = 0 then // Kiểm tra chia hết cho 9, 3, 11
s := s + 1;
end;
writeln('So luong cac so chia het cho 9, 3 va 11 la: ', s);
end.
5 tháng 4 2023
a)
program Tinh_S;
var
n, S: integer;
i: integer;
begin
write('Nhap gia tri cua n (30 <= n <= 90): ');
readln(n);
S := 0;
if (n >= 30) and (n <= 90) then
begin
for i := 1 to n do
S := S + i;
writeln('Gia tri cua bieu thuc S la: ', S);
end
else
writeln('Gia tri cua n khong hop le!');
readln;
end.
b)
program Tim_n;
var
n, S: integer;
begin
for n := 30 to 90 do
begin
S := 0;
for i := 1 to n do
S := S + i;
if S > 1000 then
begin
writeln('Gia tri cua n la: ', n);
break;
end;
end;
readln;
end.
5 tháng 4 2023
a)program Tinh_S;
var n,s,i:longint;
begin
s := 0;
write('Nhap n (30 <= n <= 90): ');
readln(n);
for i := 1 to n do
begin
s := s + i;
end;
writeln('Tong S la: ', s);
end.
b) program Tim_N;
var n,s,i: longint;
begin
s := 0;
n := 1;
while s <= 1000 do
begin
s := s + n;
n := n + 1;
end;
writeln('Gia tri n can tim la: ', n-1);
end.
5 tháng 4 2023
Để sắp xếp từ cao đến thấp về dung lượng lưu trữ của các thiết bị lưu dữ liệu, ta cần sắp xếp chúng theo thứ tự giảm dần của dung lượng lưu trữ.
Vậy đáp án chính xác là:
B. Đĩa cứng - đĩa DVD - đĩa CD - đĩa mềm.
Trong đó, đĩa cứng có dung lượng lớn nhất, tiếp theo là đĩa DVD, đĩa CD và cuối cùng là đĩa mềm có dung lượng nhỏ nhất.