Question

Найти сумму положительных нечетных чисел, меньших 100.

Answer 1

var i,sum:integer;

begin

sum:=0;

for i:=1 to 100 do

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

writelnI(sum);

end.

Answer 2

Ответ:

program gg;

uses crt;

var

  a:array[1..10] of integer;

  sum,i:integer;

begin

clrscr;

 writeln('vvedite 4isla');

 for i:=1 to 10 do

 readln(a[i]);

 for i:=1 to 10 do

 if (a[i]>0) and (a[i] mod 2 <>0) and (a[i]<100)

 then begin

      sum:=sum+a[i];

      end;

 writeln('summa: ',sum);

 readln;

 end.

Объяснение:

Answer 3

Для того чтобы найти сумму положительных нечетных чисел, которые меньше 100, следует последовательно перебирать числа от 1 до 99 и добавлять к сумме только те, которые удовлетворяют условию (положительные и нечетные). Вот как это можно сделать:

1 + 3 + 5 + ... + 95 + 97 + 99

Сумма всех этих чисел даст искомое значение. Вычислим ее:

Сумма = 1 + 3 + 5 + ... + 99

Для нахождения суммы арифметической прогрессии (1, 3, 5, ..., 99) используем формулу:

Сумма = (количество членов / 2) * (первый член + последний член)

В данной последовательности первый член (a) равен 1, последний член (l) равен 99, а количество членов (n) можно найти как (последний член - первый член) / шаг + 1, где шаг равен 2 (так как это нечетные числа).

n = (99 - 1) / 2 + 1 = 50

Теперь подставляем значения в формулу:

Сумма = (50 / 2) * (1 + 99) = 25 * 100 = 2500

Итак, сумма положительных нечетных чисел, меньших 100, равна 2500.