СРОЧНО ПЖ! 2) Составить программу, которая находит произведение всех однозначных нечётных
На языке pascal ABC .NET:
var k:integer;
Begin
k:=1;
for var i:=1 to 9 do
if (i mod 2)=0 then else k:=k*i;
write(k);
end.
Мы ещё не проходили Паскаля. Есть какое-то другое решение?