Написать программу, которая вычисляет сумму первых n нечётных натуральных чисел(паскаль). Например, если n=3 то ответ 9 т.е 1+3+5

var n, i, sum: integer;beginread(n);sum := 0;for i:=1 to n dosum := sum + (2*i-1);writeln(sum);end.