используя цикл for составить программу вычисления произведения нечётных чисел в диапозоне от 25 до 60

Question

Информатика

Селивёрст

3 апреля, 02:06

используя цикл for составить программу вычисления произведения нечётных чисел в диапозоне от 25 до 60

+2

Ответы (1)

Знаете ответ?

Илюся · Answer 1

На бейсике: p=1

for i = 25 to 60 step 2

p=p*i

next

print p

на паскале: var i, p:integer;

for i:=25 to 60 do

if i mod 2 = 1 then p:=p*i;

write (p) ;

end.