2) составить программу, которая находит произведение всех однозначных нечётных

АндрейПермь123 АндрейПермь123    1   14.03.2019 17:07    1

Ответы
darinaggg darinaggg  25.05.2020 08:42

На языке 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.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика