Помогите с информатикой 8 класс составте программу которая вычисляет произведен?
Помогите с информатикой 8 класс
составте программу которая вычисляет произведен??я натуральных чисел от 5 до 10 используя цикл while
Гость
Ответ(ы) на вопрос:
Гость Var i,p:integer;
begin
i:=5; p:=1;
while i<=10 do begin
p:=p*i;
inc(i);
end;
write(p);
end.
Не нашли ответ?
Похожие вопросы