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

Varn,i,a:integer;BeginWrite('Введите число ');Readln(n);if (n mod 2) = 0 then n:=n+1;For i:= 1 to 5 do Begina:=a+n; n:=n+2;End;Write(a,' - сумма пяти нечётных чисел');End.