Ответ(ы) на вопрос:
ГостьProgram Name; var i,s:integer; begin for i:=100 to 150 do begin if(i mod2)>0 then s:=s+i end WriteLn('Сумма равна: s) end.
Не нашли ответ?
Похожие вопросы