Найти сумму семи нечетных чисел натурального ряда, начиная с N>0. . N вводится с клавиатуры.

var n,s,i:integer;beginwrite('n = '); readln(n);if n mod 2 = 0 then n:=n+1;s:=0;for i:=1 to 7 do begin s:=s+n; n:=n+2; end;writeln('s = ',s);end.Пример:n = 10s = 119