найти произведение двузначных нечетных чисел - вопрос №13110002251264 от Help093646 06.01.2023 07:15

Question

Информатика: найти произведение двузначных нечетных чисел кратных 13 в интервале от 1 до 1000

Help093646 · Answer

Program gt; var i,p: int64; begin p: =1; for i: =1 to 1000 do begin if(i mod 2=1)and(i mod 13=0)then p: =p*i; end; writeln(p); end....

"найти произведение двузначных нечетных чисел кратных 13 в интервале от 1 до 1000"