Переведите из Python в Pascal:
a = int(input())
b = int(input())
s = 0
for i in range(a, b + 1):
if i % 2 == 0:
s += i
else:
s -= i
print(s)

LanaAnn LanaAnn    2   19.10.2020 06:46    0

Ответы
arrrtem arrrtem  18.11.2020 06:47

var a, b, s, i: integer;

begin

read(a, b);

s := 0;

for i := a to b do

   if (i mod 2 = 0) then

       s := s + i

   else

       s := s - i;

writeln(s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика