Dagdadred
7 год назад
Составить програму на поскале используя цикл repeat : посчитать произведение p = 1*3*5*...*11
ОТВЕТЫ
Адриан
Jul 11, 2019
Var x, p: integer;
begin
x:= 1;
p:=1;
repeat
p:= p*x;
x:= x + 2;
until xlt;11;
end.
begin
x:= 1;
p:=1;
repeat
p:= p*x;
x:= x + 2;
until xlt;11;
end.
93
