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

askarovaalisa askarovaalisa    3   24.06.2019 04:30    0

Ответы
sofarik3456 sofarik3456  19.07.2020 19:51
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.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика