Регистрация
АннаЛео147
17.02.2020 08:57
Информатика
Есть ответ 👍

Напишите программу которая вычисляет сумму всех четных чисел в диапазоне от 1 до n.

147
260
Посмотреть ответы 2

Ответы на вопрос:

Tony271
Tony271
4,4(40 оценок)
Var       i, n, sum: integer; begin       writeln('введите n');       readln(n);       ///тут возможны два решения, с циклом и без. вот первое:       sum : = 0;       for i : = 1 to n do               if i mod 2 = 0 then                       sum : = sum + i;       writeln(sum);             ///второе, более быстрое, использующее формулу суммы первых членов арифметической прогрессии:       if n mod 2 = 1 then n : = n - 1;       + n) div 2) * n div 2); end.
дзхен
дзхен
4,6(52 оценок)

1-они нам ориентироваться в мире.

Обояние, осязание, вкус, зрение, слух.

2.1- арбуз, вкус.

2.2-цветы, зрение.

2.3-книги, осязание, зрение.

Популярно: Информатика