bolela
Опубликовано 6 лет назад по предмету Информатика от bolela


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

  1. Ответ
    Ответ дан ali07

    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.

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц