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

Question

Информатика

Лавруша

17 сентября, 10:56

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

+3

Ответы (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.

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