Автор Lili Watson задал вопрос в разделе Другие языки и технологии
С клавиатуры вводится натуральное число n. и получил лучший ответ
Ответ от Krab Bark[гуру]
var p:longint; n,i,k:integer;
begin
write('n: '); readln(n); p:=1;
for i:=1 to n do begin read(k); if odd(k) then p:=p*k end;
writeln(p); readln; readln
end.
Krab Bark
(112095)
Можно. Напиши integer
Это уменьшит максимально возможную величину произведения. Или real - это ее увеличит.
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с ответами на Ваш вопрос: С клавиатуры вводится натуральное число n.