Составьте программу нахождения суммы чисел третьего десятка( Паскаль)

Var     i, s: integer; begin     s := 0;     for i := 30 to 39 do         s := s + i;     writeln(s); end.