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.

7 tháng 3 2023

Var a:array[1..200] of integer;

i,n:integer;

s:longint;

Begin

Write('Nhap so luong so ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i,' = ');readln(a[i]);

End;

Writeln('Cac so vua nhap la ');

For i:=1 to n do write(a[i]:6);

Writeln;

Write('Tong la ');

For i:=1 to n do s:=s+a[i];

Write(s);

Readln;

End.

16 tháng 4 2023

# Nhập danh sách số nguyên
lst = []
n = int(input("Nhập số lượng số nguyên trong danh sách: "))
for i in range(n):
    lst.append(int(input("Nhập số nguyên thứ {}: ".format(i+1))))

# Tính tổng các số trong danh sách
total = sum(lst)

# Đưa ra kết quả
print("Tổng các số trong danh sách là:", total)

11 tháng 3 2023

a = []

sum = 0

n = 5

# Nhập danh sách a

for i in range(n):

     x = int(input("Nhập phần tử thứ " + str(i+1) + ": "))

     a.append(x)

# Tính tổng các phần tử trong danh sách a

for i in range(n):

     sum += a[i]

# In ra màn hình tổng các phần tử trong danh sách a

print("Tổng các phần tử trong danh sách a là: ", sum)

7 tháng 2 2023

 

9 tháng 3 2023

Program HOC24;

var a: array[1..1000] of integer;

i,n : integer;

t: longint;

begin

write('Nhap N: '); realdn(n);

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

t:=0;

for i:=1 to n do if a[i] mod 3 = 0 then t:=t+a[i];

write('Tong cac so la boi cua 3 trong danh sach la: ',t);

readln

end.

19 tháng 12 2021

#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%2==0) t=t+i;

cout<<t;

return 0;

}

14 tháng 3 2023

n = int(input())
if n % 2 != 0:
    n -= 1
so_so_hang = (n - 2) // 2 + 1
print((n + 2)*so_so_hang // 2)

26 tháng 4 2023

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.