Помогите пожалуйста работа с паскалем
Найти сумму целых положительных чисел из промежутка от А до В, кратных 4. Значения А и В вводятся с клавиатуры.

Вопрос школьника по предмету Информатика

Помогите пожалуйста работа с паскалем
Найти сумму целых положительных чисел из промежутка от А до В, кратных 4. Значения А и В вводятся с клавиатуры.

Ответ учителя по предмету Информатика

var a,b,s,i:integer;

begin

writeln(‘a, b:’);

readln(a,b);

s:=0;

for i:=a to b do

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

writeln(‘s = ‘,s);

end.

Пример:

a, b:
20 100
s = 1260