Question

1. Знайти суму n натуральних чисел 2. Знайти суму цілих додатних парних чисел менших 503. знайти середнє арифметичне всіх цілих додатних чисел менших 20​

Answer 1

1:

var i,n,a,s: integer;

begin

   s:=0;

   write('Введите количество чисел: '); readln(n);

   for i := 1 to n do begin

       write('Введите ', i,'-е число: '); readln(a);

       s:=s+a;

   end;

   write('Сумма введённых чисел равна: ', s);

end.

2:

var i,n,s: integer;

begin

   n:=50;

   s:=0;

   for i := 1 to n-1 do begin

       if i mod 2 = 0 then s:=s+i;

   end;

   write('Сумма положительных чётных чисел меньше ', n, ' равна: ', s);

end.

3.

var i,n: integer;

   s: real;

begin

   n := 20;

   s := 0;

   for i := 1 to n-1 do begin

       s := s + i / (n-1) ;

   end;

   write('Среднее арифметическое всех положительных чисел меньше ', n, ' равна: ', s:0:2);

end.

Answer 2

1. Знайти суму перших n натуральних чисел: Сума перших n натуральних чисел може бути знайдена за формулою суми арифметичної прогресії: Сума = (n * (n + 1)) / 2

2. Знайти суму цілих додатних парних чисел менших 503: Парні числа - це числа, які діляться на 2 без залишку. Ваше завдання - знайти суму всіх парних чисел менших 503. Найбільше парне число менше 503 - це 502. Тепер ми можемо використати формулу суми арифметичної прогресії для парних чисел: Сума = (n/2) * (перше парне число + останнє парне число) = (n/2) * (2 + 502) = (n/2) * 504

3. Знайти середнє арифметичне всіх цілих додатних чисел менших 20: Середнє арифметичне чисел можна знайти, поділив суму цих чисел на їх кількість. У цьому випадку, всі цілі додатні числа менше 20 - це числа від 1 до 19. Тепер знайдемо їх суму та кількість: Сума = 1 + 2 + 3 + ... + 19 Кількість чисел = 19 Середнє арифметичне = Сума / Кількість = (1 + 2 + 3 + ... + 19) / 19

Для знаходження точного значення середнього арифметичного ви можете обчислити суму чисел вручну або за допомогою формули суми арифметичної прогресії (суми перших n натуральних чисел, де n = 19).