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

Question

Информатика

Стоян

1 мая, 14:12

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

+3

Ответы (1)

Знаете ответ?

Миленка · Answer 1

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;

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