1) сосчитать чему ровно=S. 2) найти произведение от 2 до 11. 3) сосчитать i

Question

Информатика

Декабриныч

23 июля, 09:40

1) сосчитать чему ровно=S. 2) найти произведение от 2 до 11. 3) сосчитать i

+1

Ответы (1)

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

Дека · Answer 1

Это произведение

var p, i:integer;

begin

p:=1;

for i:=2 to 11 do

p; =p*i;

writeln (p) ;

end.

Это подсчёт i

var k, i:integer;

begin

k:=0;

for i:=2 to 11 do

k; =k+1i;

writeln (k) ;

end.

сумму не понятно чего?