В программе Pascal ABC составьте программу, которая вычисляет произведение n чисел вво
В программе 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.
Не нашли ответ?
Похожие вопросы