Напишите код программы для нахождения n! (факториал) (n!=1*2*3*4....*n)​ 8класс

Question

Напишите код программы для нахождения n! (факториал) (n!=1*2*3*4....*n)​ 8класс

Answer 1

Ответ:

решение на картинке

Объяснение:

---

Comments

спасибо)

---

Здесь в программе переменная F типа integer и у него предел 32767 поэтому факториал 8!=40320>32767 аварийно завершится, поэтому для вычисление факториалов больше 8 для F нужно ставить тип Longint (2147483647) , разумеется если будет факториал который вычислит число более 2147483647 также аварийно завершится , нужно более широкий диапазон числа ставить

---

для F можно задать тип Real, будет считать 33!, а 34! выдет аварийно из за нехватки памяти по диапазону

---

Что списывать какое? Всё синее да??? Пожалуйста быстрей ответьте

---

Пожалуйста , скажите , а что именно писать ?)

---

плохо видать

---

плохо видно

---

на левом синем рисунке программа ее и нужно переписать нажав на увеличение изображение в центре рисунка

---

на правом черном фоне результат работы программы

---

program Factorial;
var F,n,i:integer
begin
F:=1;
write (‘Введите факториал F!:’);
readln(n);
for i:=1 to n do
F:=f*i;
write (‘Факториал числа ’ ,n);
write (‘ равен ’ , F);
readln;
end.