С клавиатуры вводятся n чисел найти произведение введенных чисел!

Question

С клавиатуры вводятся n чисел найти произведение введенных чисел!

Comments

на каком языке программирования?

---

Pascal ABC

Answer 1

//PascalABC.NET 3.2 сборка 1318

Var
  res,n,i,k:integer;
begin
res:=1;
writeln('N:');
readln(n);
for i:=1 to n do
begin
  readln(k);
  res:=res*k;
end;
writeln(res);
end.

Пример ввода:
3
1
2
3
Пример вывода:
6

Comments

не так, там еще кол-во чисел нужно

---

Добавь после writeln(res); строчку writeln(n);

---

Зачем Вам вывод количества введённых значений?