ДАЮ 50 БАЛЛОВ
Переведите из 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)
Переведите из 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)
More Questions From This User See All
Answers & Comments
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.