Question

СРОЧНО ДАЮ МНОГО БАЛЛОВ!!!!!!
Напишите программу для вычисления суммы четных чисел от а до с
Числа а и с вводятся.
Пример для формата ввода и вывода.
ВВОД
10 13
19
ВЫВОД
22
20
ПАСКАЛЬ! Надо var, integer, wile и так далее

Answer 1

Ответ:

program z;

var a,c,i,s:integer;

begin

readln(a);

readln(c);

s:=0;

for i:=a to c do

if i mod 2 = 0 then s:=s+i;

write (s)

end.

Объяснение:

вводятся 2 числа (a <= c)

цикл с параметром (со счётчиком)

условие для проверки чётности чисел

вычисление суммы

вывод суммы