program TinhTongSoTuNhienLe;
var
  N, i, sum: integer;
begin
  write('Nhap so N: ');
  readln(N);

  sum := 0;
  for i := 1 to N do
  begin
    if i mod 2 = 1 then // Kiểm tra số lẻ
      sum := sum + i;   // Cộng dồn vào tổng
  end;

  writeln('Tong cac so tu nhien le nho hon hoac bang N la: ', sum);
  readln;
end.

Mn giúp mk với ạ 🥺

Câu lệnh lặp sẽ được thực hiện khi giá trị của biến S là lớn hơn 0. Trong quá trình lặp, giá trị của biến i sẽ được tăng lên mỗi lần lặp cho đến khi i đạt đến giá trị n. Trong cùng mỗi lần lặp, giá trị của biến J sẽ được cập nhật bằng cách cộng thêm i^2, sau đó biến S sẽ giảm đi giá trị của i.

Khi vòng lặp kết thúc, chương trình sẽ in ra màn hình tổng S, tức là giá trị cuối cùng của biến J.

Với câu lệnh lặp như sau:

J:=0;
i:=0;
While S > 0 Do
    i:=i+1;
    J:=J+i^2;
    S:=S-i;
End;
Write(J);

Ví dụ, nếu ta gán S=5, thì chương trình sẽ tính tổng của các số bình phương từ 1^2 đến 5^2 và in ra giá trị đó, tức là 1^2 + 2^2 + 3^2 + 4^2 + 5^2 = 55.

program Tinh_tong;

uses crt;

var i,n:byte;

     S:integer;

begin

 clrscr;

 writeln('Nhap so n='); readln(n);

 i:=1 ; S:=0;

 while i<=n do

  begin

   S:=S+i; i:=i+1;

  end;

 writle('Tong n so tu nhien dau tien, S=',S);

end.

function sum_n(n: integer): integer;
var
  i, sum: integer;
begin
  sum := 0;
  i := 1;
  while i <= n do
  begin
    sum := sum + i;
    i := i + 1;
  end;
  sum_n := sum;
end;

for ... do

program Tinh_S;

uses crt;

var i,n:byte;

     S:longint;

begin

        writeln('Nhap so n='); readln(n);

       S:=0;

       for i:=1 to n do 

           if i mod 2=1 then S:=S+i;

       writeln('Tong cac so le nho hon hoac bang n la, S=',S)

       readln

end.

Tính tổng số lẻ bạn nhé

# Yêu cầu người dùng nhập 20 số nguyên không âm
numbers = []
for i in range(20):
    number = int(input("Nhập số nguyên không âm thứ {}: ".format(i+1)))
    numbers.append(number)

# Tính tổng các phần tử là số chẵn ở vị trí lẻ
total = 0
for i in range(1, 20, 2):
    if numbers[i] % 2 == 0:
        total += numbers[i]

# Hiển thị kết quả
print("Tổng các phần tử là số chẵn ở vị trí lẻ là:", total)

Chọn C