0 голосов
0 просмотров

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

спросил от Начинающий (931 баллов) в категории Информатика

1 Ответ

0 голосов
ответил от Доцент (52.1k баллов)
 
Лучший ответ

program xxx;

    var i, x, s : integer;

begin

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

  readln(x);

  s:=0

  i:=1

  while i <=x do</p>

    begin

      s:=s+i;

      i:=i+2

    end;

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

  readln

end.

...