Найти сумму четных чисел от 1 до 100 - VB (63200)

Формулировка задачи:

Найти сумму четных чисел от 1 до 100


textual

Код к задаче: «Найти сумму четных чисел от 1 до 100 - VB (63200)»

s=0
for i=1 to 100
if i mod 2 = 0 then s=s+i
next i
msgbox s
Эта работа вам не подошла?

Вы всегда можете заказать любую учебную работу у наших авторов от 20 руб.


СДЕЛАЙТЕ РЕПОСТ

9   голосов, оценка 4.000 из 5

Источник
Похожие ответы