Составить программу для нахождения произведения чётных чисел из диапозона от 3 до 17. с подробным решением!

Boba35 Boba35    1   18.05.2019 22:50    1

Ответы
didenkoelenam didenkoelenam  12.06.2020 04:03

var i,k:integer;

begin

for i:=3 to 17 do if i mod 2 = 0 then k:=k*i;

write(k);

end;

 

 

 

 

 

 

 

 

 

 

 

 

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