Найти произведение чисел 135*7 их произведение равно 105 написать эту програму в Pascal

Question

Идея

19 июля, 23:51

+1

Ответы (1)

Знаете ответ?

Атя · Answer 1

var a, sum: real;

var i: integer;

begin

sum:=1;

a:=1;

for i:=1 to 3 do begin

a:=a+2;

sum:=a*sum;

end;

writeln (sum) ;

end.

Найти произведение чисел 1*3*5*7 их произведение равно 105 написать эту програму в Pascal