viết chương trình nhập 1 xâu gồm các số nguyên các số cách nhau bởi dấu cách, tính tổng các số chẵn chia hết cho 3
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.
A=input("Nhập dãy các số cách nhau bởi dấu cách: ")
S=A.split()
k = 0
n=[]
c = len(S)
m1 = min(S)
m2 = max(S)
for x in S:
n.append(float(x))
b=[]
for a in n :
if a % 2 != 0 :
b.append(float(a))
S=0
for i in b:
k=k+i
print("Số lượng các số đã nhập",c)
print("Tổng các số lẻ là", k)
print("Số nhỏ nhất là", m1)
print("Số lớn nhất là ", m2)
program TongSoChan;
var
n, i, x, tong: integer;
begin
write('Nhap so nguyen n: ');
readln(n);
tong := 0;
for i := 1 to n do
begin
read(x);
if x mod 2 = 0 then
tong := tong + x;
end;
writeln('Tong cac so chan la: ', tong);
readln;
end.
Python:
n = [float(i) for i in input("Nhập vào một xâu: ").split()]
tong = sum(n)
TB = tong / len(n)
print("Tổng các số trong xâu là: ", tong)
print("Trung bình các số trong xâu là: ", TB)
Pascal:
program tinh_tong_trungbinh;
var
input_string: string;
numbers: array of real;
i, n: integer;
sum, average: real;
begin
write('Nhập vào một xâu: ');
readln(input_string);
// Tách chuỗi thành danh sách các số
n := 0;
for i := 1 to length(input_string) do
begin
if (input_string[i] in ['0'..'9', '.', '-']) then
begin
if (i = 1) or (not (input_string[i-1] in ['0'..'9', '.', '-'])) then
n := n + 1;
end;
end;
SetLength(numbers, n);
n := 0;
for i := 1 to length(input_string) do
begin
if (input_string[i] in ['0'..'9', '.', '-']) then
begin
if (i = 1) or (not (input_string[i-1] in ['0'..'9', '.', '-'])) then
begin
val(copy(input_string, i, length(input_string) - i + 1), numbers[n], i);
n := n + 1;
end;
end;
end;
// Tính tổng và trung bình
sum := 0;
for i := 0 to n - 1 do
sum := sum + numbers[i];
if (n > 0) then
begin
average := sum / n;
// Hiển thị kết quả
writeln('Tổng: ', sum:0:2);
writeln('Trung bình: ', average:0:2);
end
else
writeln('Không có số hợp lệ để tính toán');
readln;
end.
Bài 2:
uses crt;
var x,i,n,dem:integer;
begin
clrscr;
readln(n);
dem:=0;
for i:=1 to n do
begin
readln(x);
if x mod 2=0 then inc(dem);
end;
writeln(dem);
readln;
end.
#include <bits/stdc++.h>
using namespace std;
int B[100],n,t;
{
cin>>n;
for (int i=1; i<=n; i++) cin>>B[i];
t=0;
for (int i=1; i<=n; i++)
if (B[i]%10==0) t+=B[i];
cout<<t<<endl;
int dem=0;
for (int i=1; i<=n; i++)
if ((i%2==0) && (A[i]%2!=0)) dem++;
cout<<dem<<endl;
for (int i=1; i<=n; i++)
if ((A[i]%2!=0) && (A[i]%3==0)) cout<<A[i];
}
#include <bits/stdc++.h>
using namespace std;
int main()
{
int n, S = 0;
cin >> n;
int a[n];
for (int i = 0; i< n; i++)
{
cin >> a[i];
if (a[i]%6==0) S+= a[i];
}
cout << S;return 0;
}