profile
Опубликовано 5 лет назад по предмету Информатика от stukalov2014

Составьте и отладьте программу для вычисления количества четных отрицательных чисел от -15 до 40

  1. Ответ
    Ответ дан Б0Г
    >>количества четных отрицательных чисел от -15 до 40

    Очевидно, что ежели чётных отрицательных, то имеет смысл лишь от -15 до 0.

    var counter, sigma : integer;
    begin
    counter := -15
    sigma := 0;
    while counter < 0 do
        if (counter mod 2) = 0
           then sigma += 1;
     counter += 1;
    writeln(sigma);
    readln()
    end.

Самые новые вопросы