Question

Помогите написать программу в паскале.Найти сумму и количество чисел кратных 2, на промежутке от 2 до 15.Я вообще не знаю как писать. Можете подробно все расписать по строкам, со всеми точками с запятой, я не знаю толком синтаксис паскаля. Чтобы я могла списать на см. Заранее спасибо.

Answer 1

var  
sum, i: integer;  
begin  
for i := 2 to 15 do    
    if (i mod 2 = 0) then      
   sum := sum + i;  
Writeln(sum);
end.