ПОМОГИТЕ ПОЖАЛУЙСТА! Дам 15 балов var p,n: integer; begin p:=1; for n:=7 downto 3...

Question

ПОМОГИТЕ ПОЖАЛУЙСТА! Дам 15 балов var p,n: integer; begin p:=1; for n:=7 downto 3 do p:=p*n; writeln (p) end

Comments

Запишите результат выполнения программы

Answer 1

Ответ:

2520

Объяснение:

---

Comments

Спасибо
А как это получилось?

---

Можно решение?

---

Добавил фотографию. Смотри.

---

Спасибо