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

Составить программу вычисления произведения чисел от 10 до 15.

ОТВЕТЫ
Var p, i: integer;
 begin
  p := 1;
  for i := 10 to 15 do
   p := p * i;
  write(p);
end.
155
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам