Question

Составить программу на Паскале, которая находит сумму и произведение чисел от 100 до 300. Заранее спасибо.

Answer 1

var i,S :integer;
begin
S:=1;
for i:=100 to 300
do S=S*i;
writeln(S);
end.

Answer 2

Я конечно не умён в этом, но где сумма то?

Answer 3

прости, не прочитал, так же сделай, только еще одну переменную и с знаком +.)))))

Answer 4

я уже понял, спасибо)