составьте программу для вычисления суммы всех четных чисел от 6 до 36 паскаль

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

составьте программу для вычисления суммы всех четных чисел от 6 до 36 паскаль

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

Ответ:

var i, s: integer; 

begin 

s:=0; 

for i:=6 to 36 do 

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

end;