Вычислите сумму нечетных чисел, не превышающих числа x. первое нечетное число=1.

Kikiro Kikiro    1   01.03.2019 15:10    2

Ответы
Tittans101 Tittans101  23.05.2020 18:20

program xxx;

    var i, x, s : integer;

begin

  write('введите число Х=');

  readln(x);

  s:=0

  i:=1

  while i <=x do

    begin

      s:=s+i;

      i:=i+2

    end;

  write('сумма нечетных чисел ='; s); 

  readln

end.

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