76

Вычислите сумму нечетных чисел, не превышающих числа…

d4vinchi 24 июля 2022

Вычислите сумму нечетных чисел, не превышающих числа x. Первое нечетное число=1.

категория: информатика

65

program xxx; var i, x, s: integer; begin write ('введите число Х='); readln (x); s: =0 i: =1 while i <= x do begin s: =s+i; i: =i+2 end; write ('сумма нечетных чисел='; s); readlnend.

пользователи выбрали этот ответ лучшим
Знаете другой ответ?

Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...