В программе Pascal ABC составьте программу, которая вычисляет произведение n чисел вводимых с клавиатуры.

var    sum, k, n, i: integer;begin    sum := 0;    write('n: ');    readln(n);    for i := 1 to n do    begin        readln(k);        sum := sum + k;    end;    writeln('sum = ', sum);end.