Предмет: Информатика
Автор: chernikov9696
Вопрос задан 10 лет назад

< >

Найдите сумму натуральных нечетных чисел не превышающих n!Сделать циклм while

Ответы

Ответ дал: AntiVIRUZ

0

var i,n,sum:integer;

Begin

read(n);

i:=1;

sum := 0;

while i<=n do

begin

sum := sum + i;

i := i + 2;

end;

write(sum);

end.

Похожие вопросы

Русский язык

2 года назад

Выделеные в тексте наречия выпишите вместе со словами,к которым они относятнся.Какими частями речи выражены главные слова в получаных словосичетаниях?Укажите разряды наречий. Бурундук (постоянно)

Другие предметы

2 года назад

чим пояснити різноманітність рослинного й тваринного світу в природній зоні

Алгебра

7 лет назад

(x^2+3x-4)^3+(2x^2-5x+3)^3=(3x^2-2x-1)^3

Математика

7 лет назад

решить систему уравнений графическим способом2x+y=8 2x-y=1

Биология

10 лет назад

1)Амилаза слюны воздействует только на............... 2)В кровеносные сосуды ворсинок тонкой кишки всасывается глюкоза и ................,а в лимфатические сосуды-продукты расщепления

Алгебра

10 лет назад

при каких значениях m и n уравнение (m-2)x=n+1 имеет бесконечное множество корней

Алгебра

10 лет назад

вычислите первый, тридцатый и сотый члены последовательности, если ее n-й член задается формулой xn=(3n-6)/10

Математика

10 лет назад

В двух теплицах каждая из которых имеет прямоугольную форму собрали 680 кг перца. Длина каждой теплицы 8 м ширина одной - 2 м а другой 3 метра . Сколько кг перца собрали в каждой теплице если с 1