
Хрисанф
6 год назад
Помогите с информатикой 8 класс
составте программу которая вычисляет произведения натуральных чисел от 5 до 10 используя цикл while
ОТВЕТЫ

Liassalal
Aug 5, 2019
Var i,p:integer;
begin
i:=5; p:=1;
while ilt;=10 do begin
p:=p*i;
inc(i);
end;
write(p);
end.
begin
i:=5; p:=1;
while ilt;=10 do begin
p:=p*i;
inc(i);
end;
write(p);
end.
93
Смежные вопросы: