Найти сумму нечётных чисел от 1 до 1000 в паскаль

Ответы:
Владимир Марченко
27-06-2012 01:45

var i, sum integer;beginsum=0;for i = 1 to 1000 do if (i mod 2=1) thensum=sum+i;end.

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

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

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Найти сумму нечётных чисел от 1 до 1000 в паскаль» от пользователя Саша Смоляренко в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

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