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

Ответы:
Аврора Кудрина
04-04-2017 12:51

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.

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Мирослав Красильников

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Найдите сумму натуральных нечетных чисел не превышающих n!Сделать циклм while» от пользователя Мирослав Красильников в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!