ТутРешу.Ру

Помогите решить задачу!

Задание:

Помогите решить задачу! Найти сумму отрицательных и сумму положительных чисел на отрезке от А до В. cwhile

Решение:

c "for" var i,a,b,sum: integer; beginreadln (a,b); for i: =a to b dosum: =sum+i; writeln (sum); end.




Знаете другой ответ?

Отправить свой ответ