Составить программу, которая находит сумму чисел на [5,36] и складывается с произведением первых 5 чисел.

Question

Информатика

Евмений

15 июня, 13:48

Составить программу, которая находит сумму чисел на [5,36] и складывается с произведением первых 5 чисел.

+5

Ответы (1)

Знаете ответ на вопрос?

Надеждушка · Answer 1

Var

n, i, sum, p: integer;

begin

sum:=0;

p:=1;

for i:=5 to 36 do sum:=sum+i;

for i:=5 to 9 do p:=p*i;

sum:=sum+p;

writeln ('otvet=', sum) ;

end.