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

Svyatoslavovich
Jul 13, 2019
Var i,S :integer;
begin
S:=1;
for i:=100 to 300
do S=S*i;
writeln(S);
end.
begin
S:=1;
for i:=100 to 300
do S=S*i;
writeln(S);
end.
209