Question

Найти сумму нечетных чисел от 3 до 17,используя цикл фор

Answer 1

                                     PascalABC.NET

begin

 var m: integer;

 for var i := 3 to 17 do

   if i.IsOdd then m+=i;

 print('Сумма =', m)

end.