Написать программу c использованием div и mod , ! найти сумму чётных чисел в интервале (a,b).

195

446

Посмотреть ответы 2

Ответы на вопрос:

luizalol

Информатика

4,4(84 оценок)

//pascal var a, b, i, s: integer; begin writeln('введите левую границу диапазона'); readln(a); writeln('введите правую границу диапазона'); readln(b); s : = 0; for i : = a to b do if i mod 2 = 0 then s : = s + i; writeln('сумма четных: ', s); end.