Предмет: Информатика,
автор: tovmassaak0
ДАЮ 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)
Ответы
Автор ответа:
1
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.
Похожие вопросы
Предмет: Английский язык,
автор: hsddtfu86
Предмет: Другие предметы,
автор: Alina0Ideas
Предмет: Другие предметы,
автор: Xoroshist228
Предмет: Математика,
автор: vasilina10j
Предмет: Математика,
автор: Пума555