помогает пожалуйста работа в паскале составьте программу вычисления суммы всех трехзначных чисел кратных 4

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

помогает пожалуйста
работа в паскале
составьте программу вычисления суммы всех трехзначных чисел кратных 4

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

uses crt;

var 

n, sum:integer;

begin

n := 100;

while n < 1000 do   

begin     

sum += n;     

n += 4;   

end;   

writeln(‘Сумма всех трёхзначных чисел, кратных 4= ‘,sum);

end.