Составить програму на поскале используя цикл repeat : посчитать произведение p=1*3*5*...*11
Составить програму на поскале используя цикл repeat : посчитать произведение p=1*3*5*...*11
Гость
Ответ(ы) на вопрос:
Гостьvar x, p: integer;
begin
x:= 1;
p:=1;
repeat
p:= p*x;
x:= x + 2;
until x<11;
end.
Не нашли ответ?
Похожие вопросы