Составить программу на Паскале, которая находит сумму и произведение чисел от 100 до 300. Заранее спасибо.
Var i,S :integer; begin S:=1; for i:=100 to 300 do S=S*i; writeln(S); end.
Я конечно не умён в этом, но где сумма то?
прости, не прочитал, так же сделай, только еще одну переменную и с знаком +.)))))
я уже понял, спасибо)