Регистрация
Войти
Стать экспертом Правила
Информатика

составьте программу вычисления произведения нечетных чисел от 11 до 43 через while

ОТВЕТЫ
program f1;
var p,x: integer;
begin
p:=1;
x:=11;
while x<= 43 do begin
p:=p*x;
x:=x+2;
end;
writeln(p);
end.

624
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам