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

1)найти сумму первых k последовательных нечетных чисел. написать программу в паскале. 2)вывести на экран натуральные нечетные числа от 5 до 55.тоже паскаль 3)найти произведение последовательных натуральных чисел от n до m. написать программу паскаль. 4)найти сумму последовательных натуральных чисел от 10 до 15.тоже паскаль

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

    1)

    s := 0;

    for i := 1 to k do

    begin

      if i mod 2 <> 0 then

        s:= s + i;

    end;

    2)

    for i := 5 to 55 do

    begin

      if i mod 2 <> 0 then

        writeln(i);

    end;

    3)

    s := 1;

    for i := n to m do

    begin

      s:= s * i;

    end;

    4)

    s := 0;

    for i := 10 to 15 do

    begin

         s:= s + i;

    end;

     

    обрамления там везде одинаковые

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