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

1

Ответы и объяснения

2012-02-14T21:53:09+04:00

Это Проверенный ответ

×
Проверенные ответы содержат надёжную, заслуживающую доверия информацию, оценённую командой экспертов. На "Знаниях" вы найдёте миллионы ответов, правильность которых подтвердили активные участники сообщества, но Проверенные ответы - это лучшие из лучших.

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;

 

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