Написать программу, которая вычисляет сумму первых n целых положительных четных чисел. Количество суммируемых чисел должно вводится во время работы программы.
---------------------------------------------------------------------------------------------------------------Ниже приведен рекомендуемый вид экрана во время работы программы. Вычисление суммы четных положительных чисел. Введите количество суммируемых чисел и нажмите -> 12 Сумма первых 12 положительных четных чисел равна 156

Program n1;var i,n,sum: integer;beginreadln(n);sum:=0;for i:=1 to n do sum:=sum+2*i;writeln(sum);end.